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IDENTIFICATION 


PRODUCT CODE: AC-8580D-MC 
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DATE: JANUARY 1979 

MAINTAINER: DIAGNOSTICS 


THE INFORMATION IN THIS DOCUMENT 1S SUBJECT TO CHANGE WITHOUT NOTICE 
AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT 
CORPORATION. DIGITAL EQUIPMENT CORPORATION ASSUMES NO RESPONSIBILITY 
FOR ANY ERRORS THAT MAY APPEAR IN THIS DOCUMENT. 
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AND MAY ONLY BE USED OR COPIED IN ACCORDANCE WITH THE TERMS OF SUCH 
LICENSE. 

DIGITAL EQUIPMENT CORPORATION ASSUMES NO RESPONSIBILITY FOR THE USE OR 
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DIGITAL 


COPYR'GHT (C) 1975,1979 BY DIGITAL EQUIPMENT CORPORATION 


« 





1.0 


"Poo MACHT 30001052) 
PCD.P1 OB-FEB-79 13:15 


7 Cabral 09:33 PAGE 3 


ABSTRACT 


THE FUNCTION OF THE DUP11 DIAGNOSTICS IS TO VERIFY THAT THE 
OPTION OPERATES ACCORDING TO SPECIFICATIONS. THE DIAGNOSTICS 
VERFIY THAT THERE ARE NC MALFUNCTIONS AND THAT ALL OPERATIONS 
OF THE DUP11 ARE CORRECT IN 11S ENVIROMENT. PARAMETERS MAY BE 
SET TO ALERT DIAGNOSTICS AS TO THE ODUP11 CONFIGURATION BY 
ANSWERING THE PARAMETER DIALOG (LOAD ADDRESS=200, START 
ADDRESS=1). ALL QUESTIONS SHOULD BE ANSWERED AND THEN EACH 
DIAGNOSTIC WILL “‘OVERLAY’’ THESE PARAMETERS WHICH ARE STORED IN 
THE “"STATUS TABLE’ (SEE SECTION 8.4). THE ALTERNATIVE TO THE 
PARAMETER DIALOG 1S DEFAULT PARAMETERS (SEE SECTION 8.5). 


THE DIAGNOSTICS WILL RUN UP TO EIGHT CONSECUTIVELY ADDRESSED 


AND CONSECUTIVELY VECTORED DUP1I1"S IN A CHAIN MODE, I.E., 
RUNNING THE DIAGNOSTIC COMPLETELY FOR ONE DEVICE BEFORE 
ST@RTING THE NEXT. 


CZDPC TESTS ALL RECEIVER SDLC FUNCTIONS IN MAINTENANCE 
INTERNAL MODE, THAT 1S, CLOCKING OF THE DEVICE 1S DONE BY THE 

PROGRAM. THE DEVICE IS SET UP, A SPECIFIC NUMBER OF 

a0 Yoo ARE DONE, AND A TEST IS MADE FOR A SIGNIFICANT 
VENT. 


IN CHECKING DATA, THE SOFTWARE EMULATES THE HARDWARE AND USES 
THE PROCESSOR CARRY BIT AFTER A ROTATE TO PROVIDE AN INPUT TO 
THE RECEIVER VIA THE MAINTENANCE INPUT DATA BIT. THE PROGRAM 
CAN THEN LOAD THE RECEIVER DATA BUFFER SERIALLY,WITHOUT USING 
THE TRANSMITTER. 


THE RECEIVER BCC IS CHECKED USING THE CRC.CCITT POLYNOMIAL IN 
THE SAME WAY AS DATA, WITH ONE EXCEPTION--THE BCC IS 
CALCULATED FIRST BY THE PROGRAM AND THEN COMPARED 10 THE 
RECE]VER OUTPUT. 


SEQ 0002 


ON THE PARAMETER INFORMATION SUPPLIED THROUGH THE OVERLAY MAP. 
IN ADDITION, ALi ElA GATES, WITH THE EXCEPTION OF THE DATA 
GATES, ARE CHECKED. 


CURRENTLY THERE ARE THREE OFF-LINE DIAGNOSTICS THAT ARE TO BE 

RUN IN SEQUENCE TO ENSURE THAT IF AN ERROR SHOULD OCCUR IT 

WILL BE DETECTED AT AN EARLY STAGE AND ESTABLISH THAT 

Dae? OF THE ERROR WILL BE IMMEDIATE TO DISCOVERING THE 
LEM, 


NOTE: ADDITIONAL DIAGNOSTICS MAY BE ADDED IN THE FUTURE. 


THE THREE DIAGNOSTICS ARE: 


1. C2DPB CREV) BASIC AND OFFLINE TRANSMITTER TESTS 

2. CZDPC CREVJ OFFLINE RECEIVER AND MODEM CONTROL AND 
INTERRUPT TESTS 

3. CZDPD CREV] ot SDLC AND DECMODE DATA AND FUNCTION 


NOTE: THERE IS A FOURTH PROGRAM, TAPE CZDPE CREV] WHICH IS A 
QUICK=-VERIFY TAPE THAT REQUIRES ANSWERING A DIALOG. 
17S FUNCTICN IS TO ENABLE THE OPERATOR 10 QUICKLY 
DETERMINE IF THERE 1S A PROBLEM WITH THE DEVICE. SEE 
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REQUIREMENTS 
EQUIPMENT 


ANY PDP11 FAMILY CPU (WITH MINIMUM 8K MEMORY) 
ae (OR EQUILIVALENT) 
U 


STORAGE 


PROGRAM WILL USE ALL 8K OF MEMORY EXCEPT WHERE ABS AND 
BOOTSTRAP LOADER RESIDE. LOCATION 1500 THRU 1560 ARE 
ESPECIALLY TO BE NOTED AND LEFT UNTOUCHED BY THE OPERATOR 
AFTER THE DUP11 PARAMETER DIALOG HAS BEEN EXECUTED OR AFTER 
THE DEFAULT SETUP HAS BEEN DONE. 


LOADING PROCEDURE 
METHOD 


ALL PROGRAMS ARE IN ABSOLUTE FORMAT AND ARE LOADED USING THE 
ABSOLUTE LOADER. NOTE: IF THE DIAGNOSTICS ARE ON A MEDIA 
SUCH AS DISK, MAGTAPE, DECTAPE, OR CASSETTE FOLLOW 
INSTRUCTIONS FOR THE MONITOR WHICH HAS BEEN PROVIDED ON THAT 
SPECIFIC MEDIA. 


ABSOLUTE LOADER STARTING ADDRESS = *+500 
MEMORY SIZE 


j= 
8K 

12K 
16K 
20K 
24K 
28K 


PLACE ADDRESS 
"HALT' Si UP) 


DEPRESS ‘LOAD ADDRESS* KEY ON CONSOLE AND RELEASE. 


DEPRESS “START KEY" ON CONSOLE AND RELEASE (PROGRAM SHOULD NOW 
BE LOADING INTO CPU) 


— SS NI 
WW NNOe 


oO NNN 


F ABS LOADER INTO SWITCH REGISTER. (ALSO PLACE 


SEQ 0004 
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STARTING PROCEEDURE 
A. SET SWITCH REGISTER TO 000200 
B. DEPRESS "LOAD ADDRESS* KEY AND RELEASE 


C. SET SWR TO ZERO FOR DEFAULT PARAMETERS ESTABLISHED IN THE 
TAPE (SEE SECTION 8.5.3 FOR FULL EXPLANATION OF DEFAULT 
PARAMETERS, OR LEAVE SWR BIT 7=1 TO USE EXISTING 
PARAMETERS PREVIOUSLY SET UP BY THE DUP11 PARAMETER DIALOG 
OR A PREVIOUSLY RUN DUP11 DIAGNOSTIC. SET SwWR=1 TO GO 
THROUGH THE PARAMETER DIALOG. (IT 1S NOT NECESSARY TO 
INPUT NEW PARAMETERS FOR EACH TAPE.) (SECTION 7.2, 8.4 AND 
8.5 MAY BE HELPFUL) 


D. DEPRESS "START KEY" AND RELEASE. THE PROGRAM WILL TYPE 
MAINDEC NAME AND PROGRAM NAME (IF THIS WAS THE FIRST START 
UP OF THE PROGRAM) AND ALSO THE FOLLOWING: 


*EXAMPLE' 
"MAP OF DUP11 STATUS’ 
1500 160050 + CSR OF FIRST DUPI1 
1502 000300 » VECTOR OF FIRST DUPI1 
1504 140026 *. STATUS AND SYNC FOR FIRST DUPI1 
1506 160060 SR OF SECOND DUP11 
1510 000310 VECTOR OF SECOND DUPTI1 
1512 140026 STATUS AND SYNC FOR SECOND DUP11 


THE ABOVE 1S ONLY AN EXAMPLE! THIS WOULD INDICATE THE STATUS 
TABLE STARTING AT ADDRESS 1500 IN THE PROGRAM. THE STATUS 
TABLE MUST BE VERIFIED BY THE USER. FOR INFORMATION ON THE 
STATUS TABLE SEE SECTION 8.4 FOR HELP. 


17 1S POSSIBLE FOR THE OPERATOR TO MANUALLY CHANGE (TCGGLE IN) 
THE INFORMATION IN THE MAP TO SUIT A SPECIFIC CONFIGURATION OF 
REVICES, BUT THE RESPONSIBILITY FOR VERIFYING THAT INFORMATION 
RESTS WITH THE OPERATOR. 

THE PROGRAM WILL TYPE "R* AND PROCEED TO RUN THE DIAGNOSTIC 


CONTROL SWITCH SETTINGS 


Sw 15 SET: HALT ON ERROR 

SW 14 SET: LOOP ON CURRENT TEST 

Sw 13 SET: INHIBIT ERROR PRINT OUT 

Sw 12 SET: INHIBIT TYPE OUT/BELL ON ERROR. 
Sw 11 SET: INHIBIT ITERATIONS. (QUICK PASS) 
Sw 10 SET: ESCAPE TO NEXT TEST ON ERROR 

Sw 09 SET: LOOP WITH CURRENT DATA 

SW 08 SET: CATCH ERROR AND LOOP ON IT 

Sw O07 SET: USE PREVIOUS STATUS TABLE. 

Sid oe 


SET: RESERVED 
: RESERVED 


wn 
£ 

ww 
wa 
laa 
+ 


SEQ (005 
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SET: RESERVED 

SET: SELECT DUPI1"S DESIRED ACTIVE 

SET: LOCK ON SELECTED TEST 

SET: RESTART PROGRAM AT SELECTED TEST 
SET: ENTER PARAMETERS USING MANUAL DIALOG 


SWITCHES 8 THRCUGH 15 ARE DYNAMIC AND SHOULD BE USED AS NEEDED 
IN THE DIAGNOSTIC. SWITCHES 0 THROUGH 5 ARE STATIC (ONLY ARE 
OPERABLE WHEN iHE MONITOR PORTION OF THE TAPE IS RUNNING) AND 


SHOULD 


BE SET UP PRIOR 10 STARTING OR RESTARTING THE 


DIAGNOSTIC. 
SWITCH REGISTER RESTRICTIONS 


Sw 03 


Sw 01 


Sw 09 


RESELECT DUP11°S DESIRED ACTIVE. PLEASE NOTE THAT A 
MESSAGE IS TYPED OUT FOR SETTING THE SWITCH REGISTER 
EQUAL TO DUPI1°S ACTIVE. THIS MEANS IF THE SYSTEM HAS 
THREE DUPIIS BITS 00, O1, O2 WILL BE SET IN LOC 
*DUPACTV' FROM THE SWITCH REGISTER. USING’ THIS 
SWITCH(SWO3) ALTERS THAT LOCATION. THEREFORE, IF 
THREE DUP11S ARE IN THE SYSTEM ***#00 NOT#** SET 
SWITCHES GREATER THAN SW O02 IN THE UP POSITION. THIS 
WOULD BE A FATAL ERROR. DO NOT SELECT MORE ACTIVE 
DUP11S° THAN HAS BEEN GIVEN INFORMATION ABOUT IN THE 
PARAMETER PROGRAM. 


AS EXPLAINED IN SECTION 1.0, DEVICES SHOULD BE 
CONSECUTIVELY ADDRESSED, AND CAN BE SELECTED OR 
DESELECTED USING THIS SWITCH. 


METHOD: A. LOAD ADDRESS 200 

B. START WITH SW 05=1 

C. PROGRAM WILL TYPE MESSAGE 

D. SET THE BINARY NUMBER OF DUPIIS DESIRED 
ACTIVE. EXAMPLE: 1=1 DUP11; 3=2 DUPII; 
7=3 DUPI11; 17=4 DUPI11 37=5 DUPII ETC. 
PRESS CONTINUE. 

—. NUMBER (IF VALID) WILi BE IN DATA LIGHTS 

- (EXCLUDING 11/05) 

F. SET WITH ANY OTHER SWITCH SETTINGS 
DESIRED. PRESS CONTINUE. 


RESTART PROGRAM AT SELECTED TEST. IT JS STRONGLY 
SUGGESTED THAT AT LEAST ONE PASS HAS BEEN MADE BEFORE 
TRYING TO SELECT A TEST THAT IS NOT IN THE ORDER OF 
SEQUENCE. THE REASON FOR THIS IS THAT THE PROGRAM HAS 
TO CLEAR AREAS AND SET UP PARAMETERS IN THE MONITOR 
PORTION OF THE PROGRAM. IT IS POSSIBLE TO LD200, AND 
RAISE SWO1, THEN START, PROVIDED PARAMETERS HAVE BEEN 
PREVIOUSLY SET UP AS DESCRIBED IN SECTION 4.0. ALSO, 
WHEN A TEST IS SELECTED, ALWAYS START AT THE VERY 
BEGINNING OF THAT TEST. 


LOOP ON CURRENT DATA, THIS SWITCH WILL ONLY WORK IF 
CALL ‘SCOP1* IS IN THAT TEST. THE REASON IS THAT MOST 


SEQ 0006 
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TESTS DEAL WITH BLOCKS OF DIFFERENT DATA TO BE SENT OR 

RECEIVED ALL AT ONCE, THUS KNOWN AS BLOCK DATA=-ONE 

PATTERN CAN*T BE SINGLED OUT. (SEE SECTION 4.1.3.B.1) 
4.1.35 SWITCH REGISTER PRIORITIES 


A) ERROR SWITCHES 


- SW 12 DELETE PRINT OUT/BELL ON ERROR. 

Sw 13 DELETE ERROR PRINTOUT. 

. SW 15 HALT ON THE ERROR. 

- SW 08 GOTO BEGINNING OF THE TEST(ON ERROR). 
- SW 10 GOTO NEXT TEST(ON ERROR). 


B) SCOPE SWITCHES 


1. Sw 09 - (IF ENABLED BY ‘SCOP1") ON AN ERROR.IF AN 
ASTERISK ‘*' JIS PRINTED IN FRONT OF THE TEST NUMBER 
: (EX. *TEST NO. 10), SWO9 1S INCORPORATED IN THAT 
TEST AND THEREFORE SWO9 1S USUALLY THE BEST SWITCH FOR 
THE SCOPE LOOP (SW14=0, SW10=0, SWO9=1, SWO8=0). 


IF SWO9 1S NOT ENABELED AND THERE IS A *HARD® ERROR 
(CONSTANT ERROR) SWO8 IS BEST. (SW14=0, Sw10=0, 
SWO9=0, SWO8=1). 


FOR INTERMITTENT ERRORS, SwW14=1 WILt LOOP ON IT 
REGARDLESS OF ERROR OR NO ERROR. (SWI4=1, SW10 
SWO9=0, SWO8=1,0) 


2. -SW 14 - LOOP ON TEST. WILL LOOP ON TEST UNTiL SWITCH 
1S LOWERED. 


3. SW 11 - INHIBIT ITERATIONS (QUICK PASS). ALLOWS ONLY 
ONE PASS THROUGH A TEs!. 


4.2 STARTING ADDRESS 


STARTING ADDRESS 1S AT 000200. THERE ARE NO OTHER STARTING 
ADDRESSES FOR THE DUP11 DIAGNOSTICS. ‘ 


WE WR 
oe 


EST 
=Q., 


NOTE: {fF ADDRESS 000042 !° NON-ZERO THE PROGRAM ASSUMES IT 
1S UNDER ACT11 OR XXDP CONTROL AND Witt ACT 
ACCORDINGLY. AFTER *ALL* AVAILABLE DUP11°S ARE TESTED 
THE PROGRAM WILL RETURN TO ‘XXDP* OR ‘ACT-11', 





SEQ 0007 
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5.0 


wr 
. 


OPERATING PROCEDURE 


WHEN THE PROGRAM IS INITIALLY STARTED MESSAGES AS DESCRIBED IN 
SECTION FOUR WILL BE PRINTED AND PROGRAM WILL BEGIN RUNNING 
THE DIAGNOSTIC. 


PROGRAM AND/OR OPERATOR ACTION 
THE TYPICAL APPROACH SHOULD BE 


HALT ON ERROR (VIA Sw 15=1) WHENEVER AN ERROR OCCURS. 
CLEAR Sw 15. 

SET SW 14: (LOOP ON THIS TEST) 

- SET SW 3: (CINHIBIT ERROR PRINT OUT) 


THE TEST NUMBER AND PC WILL BE TYPED OUT AND POSSIBILY AN 
ERROR MESSAGE (THIS DEPENDS ON THE TEST), TO GIVE THE OPERATOR 
AN IDEA AS TO THE SOURCE OF THE PROBLEM. IF IT IS NECESSARY 
TO KNOW MORE INFORMATION CONCERNING THE ERROR REPORT, LOOK IN 
THE LISTING FOR THAT TEST NUMBER WHICH WAS TYPED OUT AND’ THEN 
NOTE THE PC OF THE ERROR’ REPORT. IN THIS WAY THE EXACT 
FUNCTIONING OF THE TEST CAN BE INTERPRETED SINCE THE ERROR PC 
1S THE HLT+2 LOCATION. 4 


IN SOME TESTS, THERE 1S A SUBROUTINE CALL THROUGH A_ REGISTER 
(E.G., JSR R1,FLAG). THE SUBROUTINE DOES THE DATA CHECKING 
FOR THE TEST AND WILL REPORT AN ERROR If ONE OCCURS. THiS 
MEANS THAT THE FAILING TEST COULD BE IN ONE PART OF THE 
LISTING WHILE THE SUBROUTINE THAT FOUND THE ERROR IS _ IN 
ANOTHER. PART. TO DETERMINE THE PC OF THE FAILING TEST, CHECK 
THE REGISTER USED BY THE SUBROUTINE. IT WILL CONTAIN THE 
RETURN ADDRESS OF THE FAILING TEST. 


ERRORS 


AS DESCRIBED PREVIOUSLY THERE WILL ALWAYS BE A TEST NUMBER AND 
PC TYPED OUT AT THE TIME OF AN ERROR (PROVIDING Sw 13=0 AND Sw 
i2=0). IN MOST CASES ADDITIONAL INFORMATION WILL BE SUPPLIED 
TO THE ERROR MESSAGE WHICH IS 10 GIVE THE OPERATOR AN 
INDICATION OF THE ERROR. 


ERROR RECOVERY 


o> WR — 
eee 


If FOR SOME REASON THE DUP11 StOULD ‘HANG THE BUS‘ (GAIN 
CONTROL OF BUS SO THAT CONSOLE MANUAL FUNCTIONS ARE INHIBITED) 
AN INIT OR POWER DOWN/UP IS NECESSARY FOR OPERATOR TO REGAIN 
CONTROL OF (CPU. IF THIS SHOULD HAPPEN LOOK IN LOCATION 
*TSTNO’ FOR THE NUMBER OF THE TEST THAT WAS RUNNING AT THE 
TIME OF THE CATASTROPHIC ERROR. THIS GIVES THE OPERATOR SOME 
IDEA AS TO WHAT THE DUP11 WAS DOING AT THE TIME OF THE ERROR, 
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7.0 
7.1 


7.2 


7.3 


RESTRICTIONS 
STARTING RESTRICTIONS 


SEE SECTION 4 (PLEASE). STATUS TABLE SHOULD BE VERIF]I 
REGARDLESS OF HOW THE PROGRAM WAS STARTED. ALSO, IT 
IMPORTANT TO USE THE LISTING ALONG WITH THE INFORMATI 
PRINTED ON THE TTY TO COMPLETLY ISOLATE PROBLEMS. 


ED 
1S 
ON 


OPERATING RESTRICTIONS 
DUP11 “‘PARAMETER DIALOG’’ MUST BE RUN ONLY ONCE PRIOR TO _ THE 


FIRST RUNNING OF ANY DUP11 DIAGNOSTIC IF ‘DEFAULT PARAMETERS'’ 


ARE NOT USED. IF ONLY DUP11 DIAGNOSTICS WERE LOADED AFTER 
DUP11 PARAMETER SETUP, AND If CORE MEMORY HAS NOT BEEN 
CHANGED, 1.£.,USE OF DIAGNOSTICS OTHER THAN DUP11 DIAGNOSTICS, 
AND IF THERE WERE NO DUP11 CONFIGURATION CHANGES, THE DUP11 
PARAMETER SETUP NEED NEVER BE RUN AGAIN. HOWEVER, IF ANY OF 
THE ABOVE HAVE BEEN VIOLATED THE DUP11 PARAMETER SETUP MUST BE 
RUN AGAIN BEFORE RUNNING THE DIAGNOSTICS. UNDER NORMAL 
OPERATING CONDITIONS IT SHOULD NOT BE NECESSARY TO INPUT NEW 
spt Bg TO SUBSEQUENT DIAGNOSTICS, UNLESS A CHANGE IS 
REQU . 


NOTE: AN ALTERNATIVE TO THE ABOVE IS ATTEMPTING THE DEFAULT 
Sore hee WHEN THE PROGRAM IS INITIALLY STARTED WITH 
SWR=0. 


HARDWARE CONFIGURATION RESTRICTIONS FOR THE PURPOSE OF RUNNING 
MULTIPLE DUP11°S IN CHAIN MODE. 


CSR ADDRESSES MUST BE CONSECUTIVE. 

VECTORS ARE CONSECUTIVE Ir PARAMETER PROGRAM IS USED. 

ALL JUMPERS ARE ASSUMED TO BE AS SETUP IN PARAMETER 
DIALOG. 

PRIORITY LEVEL MUST BE THE SAME FOR ALL DEVICES. 


> Wr 
. eee 
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MISCELLANEOUS 
EXECUTION TIME 


ALL DUPI1 DEVICE DIAGNOSTICS WILL GIVE AN ‘END PASS" MESSAGE 
(PROVIDING NO ERRORS AND SW12=0) WITHIN 4 MINS. THIS IS 
ASSUMING SW11=1 (DELETE ITERATIONS) IS SET TO GIVE THE FASTEST 
POSSIBLE EXECUTION. THE ACTUAL EXECUTION TIME DEPENDS GREATLY 
ON THE PDP11 CFU CONFIGURATION. 


PASS COMPLETE 


NOTE: *EVERY*® TIME THE PROGRAM IS STARTED, THE TESTS WILL RUN 
AS IF Swill (DELETE ITERATIONS) WAS UP (=1). THIS IS TO VERIFY 
NO *HARD® ERRORS AS SOON AS POSSIBLE. THEREFORE THE FIRST 
PASS--EACH TIME PROGRAM IS STARTED--WILL BE A ‘QUICK PASS‘ 
UNTIL ALL DUP11°S IN SYSTEM ARE TESTED. WHEN THE DIAGNOSTIC 
HAS COMPLETED A PASS WITH THE NORMAL ITERATION COUNT 
MT pati THE FOLLOWING IS AN EXAMPLE OF THE PRINT OUT TO 
x ° 


END PASS CZDPCC CSR:160050 VEC: 300 PASSES:000001 ERRORS:000000 

NOTE: THE NUMBERS FOR CSR AND VEC ARE NOT NECESSARILY THE 
VALUES FOR THE DEVICE. THEY ARE ONLY FOR THIS 
EXAMPLE. 

KEY LOCATIONS 

RETURN CONTAINS THE ADDRESS WHERE PROGRAM WILL RETURN 


WHEN ITERATION COUNT IS REACHED OR !F (COP ON 
TEST IS ASSERTED. 


NE KT CONTAINS THE ADDRESS OF THE NEXT TEST 10 BE 
PERFORMED. 

TSTNO CONTAINS THE NUMBER OF THE TEST NOW BEING 
PEFORMED. 

RUN THE BIT IN 'RUN® ALWAYS POINTS ONE PAST THE 


DUP11 CURRENTLY BEING TESTED. EXAMPLE: (RUN) 
/0000000001000000 MEANS THAT DUP11 NO.0S 1S 
THE DUP11 NOW RUNNING. 

ROO-DUPCRO7 

150 '=(1560) THESE LOCATIONS CONTAIN THE INFORMATION NEEDED 
TO TEST UP TO 8 (DECIMAL) DUPI1S SEQUENTIALY. 
THEY CONTAIN THE CSR, VECTOR AND = STATUS 
CONCERNING THE CONFIGURATION OF EACH DUPI1. 


DUPACTY EACH BIT SET IN THIS LOCATION INDICATES THAT 
THE ASSOCIATED DUPI1 WILL BE TESTED IN TURN. 
EXAMPLE: (DUPACTV) /0000000000011111 MEANS 
THAT DUPIT NO, 00,01,02,03,04 WILL BE TESTED. 
EXAMPLE:  (DUPACTY) —/0600000000010001 MEANS 


SEQ 0010 
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THAT DUPTI NO. 00,04 WILL BE TESTED. 


RAXCSR CONTAINS THE RECEIVER CSR OF THE CURRENT DUPT1 
. UNDER TEST. 
B.4 MORE ON THAT "STATUS TABLE’ (1500-1560) 


“MAP OF DUPI1 STATUS* 


1500 160050 
1502 000300 
1504 140000 


THE ABOVE INFORMATION WILL BE REPEATED FOR EACH OF UP T0 8 
DUPTI'S IN THE SYSTEM (THESE WILL FOLLOW UNDER THIS TABLE). 
EXPLANATION: 


1500 160050 THIS IS THE SYSTEM CONTROL REGISTER FOR THE 
1ST DUPI1 IN THE SYSTEM. 


1502 000300 THIS IS VECTOR ‘A’ FOR THE FIRST DUPI1 IN THE 
SYSTEM, 


1504 140026 THIS REPRESENTS SYNC AND SOFTWARE STATUS FOR 
THE FIRST DUP. 


THE BITS ARE AS FOLLOWS: 


BIT 15 SET: OPTIONAL CLEAR JUMPER IN 

BIT 14 SET: TURNAROUND CONNECTOR ON 

BIT 13 SET: 

BIT 12 SET: 

BIT 11 SET: 

BIT 10 SET: 

BIT 09 SET: 

BIT 08 SET: 

811 07-00 SYNC CHARACTER FOR DECMODE TESTS. 


THE ABOVE 1S REPEATED FOR EACH DUPI1 IN THE SYSTEM. THE TABLE 
1S FILLED BY DEFAULT PARAMETERS OR BY THE MANUAL PARAMETER 
INPUT AS DESCRIBED PREVIOUSLY. ALSO, IF DESIRED BY THE 
USER - THE LOCATIONS MAY BE ALTERED BY HAND (TOGGLED IN) TO 
SUIT THE SPECIFIC CONFIGURATION, THUS MAKING EACH DEVICE MAP 
DIFFERENT. 11 IS THE RESPONSIBILITY OF THE OPERATOR TO VERIFY 
THE DATA IN THE MAP, 


&.5 METHOD OF DEVELOPING DEFAULT PARAMETERS 
6.3.7 DEFAULT PARAMETER ASSUMPTIONS 
TOO MUCH HARDWARE WOULD HAVE TO BE ANALYZED TO SIZE THE THE 
PARAMETERS, THE PROGRAM MUST ASSUME THE VARIATIONS. THE | 


RESULT, IF NOT TO YOUR SPECIFIC CONFIGURATION, MAY BE ALTERED 
BY WAND (TOGGLE IN) AS DESIRED. IN THIS WAY 95% OF THE 





C70PCC MACYI1 30A(1052) 26-FEB-79 09:35 PACE 13 SEQ 0012 
C7DPCD.P1 OB-FEB-79 13:15 


PARAMETER SETUP WAS DONE BY THE PROGRAM AND 52% BY YOU. 
THEREFORE : 


1) ALL JUMPERS ARE ASSUMED 10 BE IN THE FOLLOWING 
CONFIGURATION, 


IN Out 
wl=SECONDARY REC ENABLE * 
we=SEC REC DISABLE x 
w3-CLEAR OPTION x 
W4=SEC TX ENABLE ¥ 
w5=DSC A CONTROL x 
W6-A*B DS CONTROL ¥ 
w7=BUS GRANT CONTROL x 


2) THE 4325 TURN AROUND CONNECTOR IS ASSUMED TO Be ON. 


5) THE MANUFACTURING OPTION CSR GF 160050 AND VECTOR OF 770 
ARE USED. 


4) THE BR LEVEL JS ASSUMED 10 BE 5. 


IN ALL ADJUSTMENTS PLEASE REFER TO SECTION 8.4 FOR GREATER: 
DETAIL. 


C7DPCC 


C7DPCD.P11 










MACY11 3041052) 
08-FEB-79 


100000 


000010 


000004 
000002 
000001 


yn 1 


me 7 FEB-79 09:35 PAGE 14 SEQ 0015 


INTRODUCTION TO DUP11 DIAGNOSTIC 


s*CZDPCCO /<377>/DUP11 OFLNE SDLC RCV 
>*COPYRIGHT(C) 1975,1978, DIGITAL POUL PMENT CORP., MAYNARD, MASS. 01754 


*@eeeeweecerceeeeeces it. Pathe eth onto terete eee Radne iaiatinat Atacisale t A OE 
° 


STARTING PROCEDURE 

;LOAD PROGRAM 

;LOAD ADDRESS 000200 

;PRESS START 

:PROGRAM WILL TYPE "CZDPCCO /<377>/DUP11 OFLNE SDLC RCVR ° 
PROGRAM WILL TYPE Re TO INDICATE THAT TESTING HAS STARTED 
:AT THE END OF A PASS, PROGRAM WILL TYPE PASS COMPLETE MESSAGE 
AND THEN RESUME TESTING 


;SWITCH REGISTER OPTIONS 


$W15=100000 


HALT ON ERROR 
$W14=40000 :=1,LOOP ON CURRENT TEST 


321 
+= 
Sw13=20000 :=1, INHIBIT ERROR TYPEOUT 
Sw12=10000 :=1, DELETE TYPEOUT/BELL ON ERROR. 
Sw11=4000 :=1. INHIBIT ITERATIONS 
$w10=2000 :=1,ESCAPE TO NEXT TEST ON ERROR 
Sw09=1000 :=1,LO00P WITH CURRENT DATA 
$w08=400 :=1,L00P ON ERROR 
$w07=200 
Sw06=100 
$w05=40 
$W04=20 
SwO3=19 : SELECT DUP'S DESIRED ACTIVE 
:NOTE: THIS MUST NOT EXCEED ORIGINAL COUNT 
SWO2=4 sLOCK ON TEST SELECT 
SwO1=2 “RESTART PROGRAM AT SELECTED TEST 
SwO0=% ENTER PARAMETERS 


——— aaa 
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900000 
000001 


000007 


177776 
001150 


005746 
005726 
010046 
012600 
024646 
022626 


100000 
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sREGISTER DEFINITIONS 


RO=20 ;GENERAL REGISTER 

Ri=%1 sGENERAL REGISTER 

R2=22 ;GENERAL REGISTER 

R3=25 ;GENERAL REGISTER 

R4=%4 ;GENERAL REGISTER 

R5=25 ;GENERAL REGISTER 

SP=26 ;PROCESSOR STACK POINTER 
PC=%7 ;PROGRAM COUNTER 


;LOCATION EQUIVALENCIES 


PS=177776 ;PROCESSOR STATUS WORD 
STACK=1150 START OF PROCESSOR STACK 


; INSTRUCTION DEFINITIONS 


PUSH1SP=5746 ;DECREMENT PROCESSOR STACK 1 WORD 
POP 1SP=5726 INCREMENT PROCESSOR STACK 1 WORD 
PUSHRO=10046 SAVE kO ON STACK 

POPRO=12600 RESTORE RO FROM STACK 
PUSH2SP=24646 ;DECREMENT STACK TWICE 
POP2SP=22626 s INCREMENT STACK TWICE 

-EQUIV EMT,HLT ;BASIC DEFINITION OF ERROR CALL 


100000 


So 


00 


iv ofc ols oRevkecheckechecke che chesheshesie che sie »] 
be be es be ee ss Ot Oe ts Bt Ot Ot Oe Oe 
a st a tt tt at st Ht Ht 
O—NMWFEWOnwWO—— ae oe 
nhuuenh oe oh nh hom Wwe 


— Na BS HS a NH as nh a 





eee eee 


SEQ 0014 
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CZDPCD.P11 OB-FEB-79 13:15 TRAPCATCHER FOR UNEXPECTED INTERUPTS 

617 ’ ;f®eerererererertererterererereereereereeeeeeteeeteeeeeteeeeeereertetererenet 

618 al et ee a eee aaeeteaeteeteeteteteteteteeteteee 

619 > TRAPCATCHER FOR ILLEGAL INTERRUPTS 

620 s THE STANDARD “‘TRAP CATCHER’ IS PLACED 

621 : BETWEEN ADDRESS 0 10 “ts 776. 

os8 311 LOOKS LIKE ‘’PC#2 HALT” 

"4 Fe ee ee meee cece eee eee cesses eee sees es cocesoecoocoooooo=s 
624 pitteererererereerrerrerereeereretereeeeneeeeeneeeteneeneeneereteeeeeee 
625 
626 000000 .20 
627 sSTANDARD INTERRUPT VECTORS 
$28 pr eee n een ee enene 
629 
630 000024 .=24 
631 000024 005050 ~PFAIL sPOWER FAIL HANDLER 
632 000026 000340 340 sSERVICE AT LEVEL 7 
633 000030 004350 HLT sERROR HANDLER 
634 000032 000340 340 sSERVICE AT LEVEL 7 
635 000034 004316 - TRPSRV ;GENERAL HANDLER DISPATCH SERVICE 
636 000036 000340 340 sSERVICE AT LEVEL 7 
637 000040 .=40 
638 000040 000000 0 >SAVE FOR ACT=11 OR DDP2 
639 000042 000000 0 sRETURN ADDRESS IF UNDER ACT=-11 OR DDP2 
640 000044 000000 0 sSAVE FOR ACT=-11 OR DDP2 
641 000046 003104 SENDAD sFOR USE WITH ACT=-11 OR DDP2 
642 000052 ~*52 
643 000052 000000 0 sACT=-11 PROGRAM CHARACTERISTICS 
644 
645 000174 2174 
646 000174 000000 DISPREG:0 >SOFTWARE DISPLAY REGISTER 
647 000176 000000 SWREG: 0 sSOFTWARE SWITCH REGISTER 
648 000200 .=200 
4 000200 000137 001562 ° JMP START :G0 TO START OF PROGRAM 
6 
651 | 
652 001000 .=1000 
4 001000 005377 055103 050104 MTITLE: .ASCIZ <377><12>/CZDPCCO /<377>/DUP11 OFLNE SDLC RCVR /<377> 
(2) 

654 001200 -=1200 

655 >SWR AND LIGHTS 

656 | ee eeweeeeenoeee 

657 

658 001200 177570 DISPLAY: 177570 311/45 CONSOLE LIGHTS 

659 001202 177570 SWR: 177570 s INDIRECT POINTER TO SWITCH REGISTER 
660 

661 s INDIRECT POINTERS TO TELETYPE VECTORS AND REGISTERS 

et | { Powowwocoeressroroseserresewroesoooooorroseossesese 

6 

664 001204 177560 TKCSR: 177560 s TELETYPE KEYBOARD CONTROL REGISTER 
665 001200 177562 TKDBR: 177562 sTELETYPE KEYBOARD DATA BUFFER 

666 001210 177564 TPCSR: 177564 sTELEPRINTER CONTROL REGISTER 

667 601212 177566 TPDBR: 177566 sTELEPRINTER DATA BUFFER 

668 

669 sPROGRAM CONTROL PARAMETERS 
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672 001214 000000 RETURN: 0 ;SCOPE ADDRESS FOR LOOP ON TEST 
673 001216 000000 NEXT: 0 sADDRESS OF NEXT TEST TO BE EXECUTED 
674 001220 000000 LOCK: 0 ;ADDRESS FOR LOCK ON CURRENT DATA 
675 001222 000001 ICOUNT: 1 ;NUMBER OF ITERATIONS THAT CURRENT TEST WILi BE EXECUTED 
676 001224 000000 LPCNT: O ;NUMBER OF ITEREATIONS COMPLETED 
677 001226 000000 TSTNO: O ;NUMBER OF TEST IN PROGRESS 

678 001230 000000 PASCNT: 0 ;NUMBER OF PASSES COMPLETED 

679 001232 000000 ERRCNT: 0 : TOTAL NUMBER OF ERRORS 

oat 001234 000000 LSTERR: 0 sPC OF LAST ERROR CALL 

682 ;PROGRAM VARIABLES 

683 ptr r cece eoencee- 

684 

685 001236 000000 TEMP1: O s TEMPORARY STORAGE 

686 001240 000000 TEMP2: 0 : TEMPORARY STORAGE 

687 001242 000000 TEMP3: 0O s TEMPORARY STORAGE 

688 001244 000000 TEMP4: 0 s TEMPORARY STORAGE 

689 001246 000000 TEMPS: O ; TEMPORARY STORAGE 

690 001250 000000 SAVRO: 0 ;RO STORAGE 

691 001252 000000 SAVR1: 0 3R1 STORAGE 

692 001254 000000 SAVR2: 0 3R2 STORAGE 

693 001256 000000 SAVR3: 0O >R3 STORAGE 

694 001260 000000 SAVRE: 0 7R4 STORAGE 

695 001262 000000 SAVRS: 0 7R5 STORAGE 

696 001264 000000 SAVSP: 0 sSTACK POINTER STORAGE 

os 001266 000000 SAVPC: 0 ;PROGRAM COUNTER STORAGE 

6 

699 001270 000000 SAVROA: 0 sRO STORAGE 

700 001272 000000 SAVRIA: 0 3R1 STORAGE 

701 001274 000000 SAVR2A: 0 sR2 STORAGE 

702 001276 000000 SAVR3A: 0 3R3 STORAGE 

703 001300 000000 SAVRGA: 0 3R4 STORAGE 

706 001302 000000 SAVRSA: 0 3R5 STORAGE 

705 001304 000000 SAVSPA: 0 >STACK POINTER STORAGE 

ae 001306 000000 SAVPCA: 0 sPROGRAM COUNTER STORAGE 

702 001310 000001 DUPACTV: .BLKB 1 ;DUP11°S SELECTED ACTIVE. 

709 001311 000001 DUPNUM: .BLKB 1 sOCTAL NUMBER OF DUP11°S. 

710 001312 009001 SAVACT: .BLKB 1 sORIGINAL ACTV. DEVICES. 

711 001313 000001 SAVNUM: .BLKB 1 ;WORKABLE NUMBER. 

712. 001314 000001 RUN: ~BLKB 1 sPOINTER ONE PAST RUNNING DEVICE. 
713 001316 EVEN 


714 001316 001500 CREAM: DUP.MAP ° > TABLE POINTER. 


CZDPCC = MACY11 30A(1052) 
OB-FER-79 13:15 


CZDPCD.P11 


100000 


000002 
000001 


100000 


000400 


100000 
001000 
010000 


100000 


000010 


000000 
014000 
010000 
004000 


100000 
040000 
620000 
010000 
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PROGRAM PARAMETERS, VARIABLES, AND TRAP CALLS 


OVRRUN= 


DD 
mn 
oO 
=z 
" 
@ 
—e— 1 ot 
© CD Om me es ees 


CRCEN 


MMCDE 
MMODE 
BI Tw= 
TXACT 
MRESE 
TXDON 
TXINT 
SEND= 


1 @Omm—a4uOrwo-ra4 ONS 
Oe un nD ian 


US 
MMODE=14000 
MEXT=10000 
SYSTST=4000 


ON fuego 


; CONTROL REGISTER DEFINITIONS 


SEQ 0017 
G 
! 
| 
| 
| 


XCSR BIT seathae ry 


ATA SET CHANGE A 
RIN 


CLR TO SEND 
;CARRIER DETECT 
REC ACTIVE 
SEC REC DATA 
DATA a RDY 


REC INTR ENABLE 

;DSC INTR ENABLE 

REC ENABLE 

>SEC XMIT DATA 

;REQ TO SEND 

sDATA TERM RDY 
DATA SET CHANGE B 


BUF BIT DEF WIT ONS 


REC DATA ERROR 
“OVERRUN ERROR 
CRC ERROR 
REC ABORT 

sREC END OF MESSAGE 
REC START OF MESSAGE 


CSR BIT DEFINITIONS 


:DEC MODE (DDCMP) 
:CRC ENABLE 
;PRI/SEC SELECT 


SR BIT DEFINITIONS 


3 TX DATA LATE 
“MAINT DATA OUT 
-€L€ 
sMAINT MODE B 
sMAINT MCDE A 
:B1T WINDOW INPUT 
31M ACTIVE 
>MASTER RESET 
>XM1T DONE 
:XMIT DONE INTR ENABLE 
= 

X/FDX 


;TXCSR WRD DEFINITIONS 


;USER MODE 

:MAINT INT MODE 
MAINT EXT MODE 
SYSTEM TEST MODE 


; TXDBUF BIT DEFINITIONS 


a 
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001320 


001336 





30A(1052) 26 
O8-FEB-79 13:1 


004000 
002000 


901000 
(40400 


000000 
0 


000001 


-FEB-79 09: 
5 
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PROGRAM PARAMETERS, VARIABLES, AND TRAP CALLS. 
TIMER=BIT11 sMAINTENANCE TIMER 
TABORT=B] 110 ; TRANSMIT ABORT 

TEOM=B119 ; TRANSMIT END OF MESSAGE 
TSOM=B118 ; TRANSMIT START OF MESSAGE 


7MISC. PROGRAM DEFINITIONS 


DATA: .WORD O 
SHIFTS: .WORD 0 
MIND: WORD ; 
STUMFL: .BLKW 1 


SRIMFL: 





SEQ 0018 


CZ7DPCC 


CZDPCD. 


0 OD 09 Op C9 Cp CO 
ee at as st 
OONAWEWGW 


820 


MACY11 30A(1052) 


P11 


001340 
001341 
001342 
001343 


001344 
001344 
001346 
001350 
001352 
001354 
001356 
001360 
001362 
001364 
001366 
061370 
001372 


O8-FEB-79 1 


000000 


104400 
003160 
104401 
003312 
104402 
003336 
104403 


604242 
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SEQ 0019 


PROGRAM CONTROL FLAGS 


INIFLG: .BYTE 
ERRFLG: .BYTE 
LOKFLG: .BYTE 
Qv.FLG: .BYTE 
-EVEN 

$v=0 


;PROGRAM iNITIALIZATION FLAG 

;ERROR OCCURED FLAG . 
;LOCK ON CURRENT TEST FLAG 

sQUICK VERIFY FLAG. 

:ON FIRST PASS OF EACH DUPI1 ITERATIONS 
sWILL BE SUPPRESSED 


;DEFINITIONS FOR TRAP SUBROUTINE CALLS 
sPOINTERS TO SUBROUTINES CAN 8E FOUND 
7 IN THE TABLE IMMEDIATLY FOLLOWING THE DEFINITIONS 


;iteteeeeneetereneeeerrerererettrrereteeeeeeeeeeneeeeteeeeeeeeeeeerenete 


"TRPTAB: 
SCOPE =TRAP+0 


. SCOPE 
SCOP1=TRAP+# i 
-5sCO 
TYPE=TRAP+2 
2 TYPE 
INSTR=TRAP+3 
- INSTR 
INSTER=TRAP+4 
- INSTER 
PARAM= TRAP +S 
» PARAM 
SAVO5=TRAP+6 
. SAVO> 
RESOS=TRAP+7 
-RESOS 
CONVRT=TRAP+10 
. CONVRT 
CNVRT= vmaipe lt 
CNV 
PRCLK=TRAP# 12 
~PKCL 


SETFLG= vitape 
-SETFLG 


RT 


SCOPE LOOP AND ITERATION HANDLER 
LOOP ON CURRENT DATA HANDLER 
TELETYPE OUTPUT ROUTINE 

ASCII STRING INPUT ROUTINE 

INPUT ERROR HANDLER 

NUMERICAL DATA INPUT ROUTINE 
REGISTER SAVE ROUTINE 

REGISTER RESTORE ROUTINE 

DATA OUTPUT ROUTINE 

DATA OUTPUT ROUNTINE WITHOUT CR/LF. 
CLOCK ROUTINE 

TELETYPE INPUT ROUTINE 


° e 
Si eeeeesereceseceseeereesenenereseeeereeesaneetateeneeteneeenereeeesene 


—_—— 


CZDPCC 


CZDPCD. 


MACY11 30A(1052) 
OB-FEB-79 13:15 


P11 


001374 


001430 


601432 
001433 
001434 


000000 
000000 


000 
010 
000000 
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DUPRVC: 
DUPRPS: 
DUPTVC: 
DUPTPS: 


RXCSR: 


RXDBUF : 
PARCSR: 


TXCSR: 


TXDBUF : 
DUPSEC: 
HUFPSR: 
HUPRBF : 
HUPRCR: 
HUPTBF : 
HUPTCR: 


MASK .A: 


CLK.A: 


00.00: 


H 2 


;DUP11 VECTOR AND REGISTER INDIRECT POINTERS 


POINTER TO DUP11 RECEIVER INTERRUPT VECTOR 
;POINTER TO DUP11 RECEIVER INTERRUPT SERVICE PS 
POINTER TO DUP11 TRANSMITTER INTERRUPT VECTOR 
;POINTER TO DUPI1 TRANSMITTER INTERRUPT SERVICE PS 
:POINTER TO DUP11 RECEIVER STATUS REGISTER 
;POINTER TO DUP11 RECEIVER DATA BUFFER 

;POINTER TO DUP11 PARAMETER STATUS REGISTER 
POINTER TO DUP11 TRANSMITTER STATUS REGISTER 
;POINTER TO DUP11 TRANSMITTER DATA BUFFER 

;POINTER TO DUP11 SECONDARY REGISTER SELECT REGISTER 
;POINTER TO PARAMETER STATUS HIGH BYTE 

;POINTER TO RECEIVER BUFFER HIGH BYTE 

;POINTER TO RECEIVER CONTROL REG HIGH BYTE 
;POINTER TO TRANSMITTER BUFFER HIGH BYTE 

;POINTER TO TRANSMITTER CONTROL REG HIGH BYTE 


ooooo°oo oO GFOOCO 


;DUP11 CONTROL INDICATORS FOR CURRENT DUP11 UNDER TEST 


-BYTE 000 ;LAST CHAR TO TEST AND PARITY MASK 
-BYTE 8. ;NUMBER OF CLOCKS NEEDED FOR ONE CHAR 
000000 ;PARAMETERS 
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864 ;GUP11 STATUS TABLE AND ADDRESS ASSIGNMENTS 


866 
867 001500 -= 1500 
868 001500 DUP .MAP: 
869 001500 000001 DUPCRO: .BLKW 1 sCONTROL STATUS REGISTER FOR DUP11 NUMBER 0 
870 001502 000001 DUPTRO: .BLKWwW 1 ;VECTOR ‘‘A’' FOR DUP11 NUMBER 0 
+4 001504 000001 DUPO.A: .BLKWwW 1 ;PARAMETER FOR DUP11 NUMBER O 
873 001506 000001 DUPCRI: .BLKW 1 ;CONTROL STATUS REGISTER FOR DUP11 NUMBER 1 ; 
874 001510 000001 DUPTR1: .BLKW 1 ;VECTOR ‘‘A’’ FOR DUP11 NUMBER 1 
zoe 001512 000001 DUP1.A: .BLKW 1 ;PARAMETER FOR DUP11 NUMBER 1 
877 001514 000001 DUPCR2: .BLKW ey 
878 001516 000001 DUPTR2: .BLKW 1 ;VECTOR ‘‘A*’ FOR DUP11 NUMBER 2 
te 001520 000001 DUP2.A: .BLKWwW 1 ;PARAMETER FOR DUP11 NUMBER 2 
881 001522 000001 DUPCR3: .BLKW 1 ;CONTROL STATUS REGISTER FOR DUP11 NUMBER 3 
882 001524 000001 DUPTR3: .BLKW 1 ;VECTOR ‘‘A*' FOR DUP11 NUMBER 3 
$4 001526 000001 DUP3.A: .BLKW 1 ;PARAMETER FOR DUP11 NUMSER 3 
4 
885 001530 000001 DUPCRS4: .BLKw 1 sCONTROL STATUS REGISTER FOR DUP11 NUMBER 4 
886 001532 000001 DUPTR4: .BLKW 1 sVECTOR ‘A’ FOR DUP11 NUMBER 4 
4 001534 000001 DUP4.A: .BLKW 1 ;PARAMETER FOR DUP11 NUMBER 4 
889 001536 000001 DUPCRS: .BLKWwW 1 sCONTROL STATUS REGISTER FOR DUP11 NUMBER 5 
890 001540 000001 DUPTR5: .BLKW 1 ;VECTOR ‘A’ FOR DUP11 NUMBER 5 
444 001542 000001 DUPS.A: .BLKwW 1 ;PARAMETER FOR DUP11 NUMBFR 5 
893 001544 000001 DUPCR6: .BLKW 1 :CONTROL STATUS REGISTER FOR DUP11 NUMBER 6 
894 001546 000001 DUPTR6: .BLKW 1 ;VECTOR ‘‘A*S FOR DUP11 NUMBER 6 
+44 001550 000001 DUP6.A: .BLKW 1 ;PARAMETER FOR DUP11 NUMBER 6 
Le) 
897 001552 000001 DUPCR7: .BLKW 1 ;CONTROL STATUS REGISTER FOR DUP1] NUMBER 7 
898 001554 000001 DUPTR7: .BLKW 1 sVECTOR ‘A’ FOR DUP11 NUMBER 7 
699 00155¢ 000001 DUP7.A: .BLiKWw 1 sPARAMETER FOR DUP11 NUMBER 7 
900 





009000 





001560 





000000 DUP.END: 





/ sCONTROL STATUS REGISTER FOR DUP11 NUMBER 2 
| 
' 
| 
| 
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15 14 13 12 11 #10 09 08 07 06 05 04 03 02 01 00 


l ] ] } l ] ] l ] A- OPTIONAL CLEAR JUMPER IN=1 
CRESS ECP LISP ES liaoete =*+ £.f 8... BF B- TURNAROUND CONNECTOR ON=1 
] l ] ] ] ] ] ] I a 


CZDPCC = MACYI1 30A(1052) 


CZDPCD.P11 


980 
981 


001562 


001656 
001664 


0 
002050 


08-FEB-79 


o-o-—-—3o-000 


—— O00 =| $$ O00 3 a os 
dO yt eb ye triton 
Ww 
N 


Sooooocoocooo ooo 
— =f — OO om 


100002 
000137 


032777 


160000 
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000340 


001562 


000006 
000004 
001710 
177274 


000176 
000174 


000004 
000006 
001340 
003104 
001000 
001340 
177210 
002520 
000001 
002360 
001332 
000001 
001500 


001560 


177776 


000024 
001313 


000004 


001202 
001200 


000042 


177174 


001340 


START: 


12$: 


13$: 


11$: 


6$: 


10$: 


68$: 


K 2 
SEQ 0023 


:PROGRAM INITIALIZATION 

LOCK OUT INTERRUPTS 

;SET UP PROCESSOR STACK 

SET UP POWER FAIc VECTOR 

CLEAR PROGRAM CONTROL FLAGS AND COUNTS 
TYPE TITLE MESSAGE 


MOV #340,PS ;LOCK OUT INTERRUPTS 

MOV ASTACK ,SP SET UP STACK 

MOV #.PFAIL #24 ;SET UP POWER FAIL VECTOR 

MOV8 DUPNUM, SAVNUM ;SAVE NUMBER OF DEVICES IN SYSTEM 


CLR PASCNT :CLEAR PASS COUNT 

CLRB ERRFLG :CLEAR ERROR FLAG 

CLRB QV.FLG ZERO QUICK VERIFY FLAG x 
MOV #DUP MAP, CREAM :GET MAP POINTER 

MOVB #1,RUN ;POiNT POINTER TO FIRST DEVICE. 

CLR ERRCNT ;CLEAR ERROR COUNT 

CLR LSTERR :CLEAR LAST ERROR POINTER 

MOV #1,TSTNO ;SET UP FOR TEST 1 

MCV #.START,RETURN :SET UP FOR POWER FAIL BEFORE 


TESTING STARTS 


MOV a46,-(SP) ;SAVE CURRENT VECTORS 
MOV aa4 ,-(SP) ‘ 
MOV #12%$,a84 ;SETUP FOR TIMEOUT 
TST aSwR SREFERENCE HARDWARE SWITCH REG 
BR 13% 3BR IF IT EXISTS 
MOV ASWREG, SWR sPOINT TO SOFT SWR 
MOV MDISPREG, DISPLAY s;POINT TO SOFT DISPLAY REG 
CMP (SP)+,(SP)+ ADJUST STACK 
MOV (SP)+,a44 sRESTORE VECTORS 
MOV (SP)+,a#6 ; 
TSTB INIFLG 7HAS INITIALIZATION BEEN PERFORMED 
BEQ 11% 
BR 6$ 
CMP #SENDAD ,a#42 s1F ACT=-11 AUTO MODE, 
BEQ 6$ sDON'T TYPE ID 
TYPE MTITLE sTYPE TITLE MESSAGE 
COMB INIFLG :1F NOT SET FLAG AND DO 
TS1B aSwR :BI17=1?? 
BPL 10$ 
JMP 1$ 
BIT + ere aSwWR sENTER PARAMETERS 
BNE 7 YES 
JMP 318 3NO 
COMB LAG 
MOVB a1 IMIFLG sSéT 10 A crac ENTRY 
MGV #DUP .MAP,RO 3CLR MAP 
CLR (RO) + 
on RO, #DUP.END ;DONE WITH MAP? 
NE 


68% ;BR IF NO 
INSTR ;OUTPUT MESSAGE & GET INPUT STRING 
MCSR > MESSAGE 

PARAM sCONVERT STRING 

160000 ;LOwW LIMIT 


ee ee 


002052 


002244 
002252 


CZDPCC MACY11 30A(1052) 
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001500 
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001240 001320 


01322 


001323 


100000 
001322 


040000 
000001 
001236 
001256 


-BYTE 
-BYTE 


-BYTE 
-BYTE 


BYTE 
-BYTE 


-BYTE 
-BYTE 


71%: 


69%: 


70$: 





k @ 


HIGH LIMIT 
;STORE AT THIS LOCATION 
[MASK 


;HOW MANY TIMES + 2 

[OUTPUT MESSAGE & GET INPUT STRING 
7 MESSAGE 

; CONVERT STRING 

;LOW LIMIT 


;HIGH LIMIT 
;STORE AT THIS LOCATION 
7 MASK 


;HOW MANY TIMES + 2 
;OUTPUT MESSAGE & GET INPUT STRING 


; MESSAGE 
; CONVERT STRING 
LOW LIMIT 


;HIGH LIMIT 
;STORE AT THIS LOCATION 
7 MASK 


sHOW MANY TIMES + 2 


TEMP2,PRIRTY ; SAVE PRIORITY 
;OUTPUT MESSAGE & GET INPUT STRING 
; MESSAGE 

; CONVERT STRING 

;LOW LIMIT 


;HIGH LIMIT 
;STORE AT THIS LOCATION 
; MASK 


;HOW MANY TIMES + 2 


;OUTPUT MESSAGE & GET INPUT STRING 


MESSAGE 


;ME 

;SET FLAG BASED UPON INPUT STRING 
THIS FLAG 

s;OUTPUT MESSAGE & GET INPUT STRING 
7 MESSAGE 

3SET FLAG BASED UPON INPUT STRING 
THIS FLAG 

sus 

;OUTPUT MESSAGE & GET INPUT STRING 
; MESSAGE ; 

;SET FLAG BASED UPON INPUT STRING 
;THIS FLAG 


sOUTPUT MESSAGE & GET INPUI STRING 
; MESSAGE 

SET FLAG BASED UPON INPUT STRING 
;THIS FLAG 


OPCLRJ 

69% 
#B1115,DUPO.A 
TCNFLG 

70% 
#B1114,DUPO.A 
#1, SAVACT 


TEMP] ,DUPNUM 
TEMP), SAVNUM 











CZDPCC 
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002260 


002564 
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005337 


Se ee 
*- ooooooOnNmnrnrnrnr 


104402 


001236 


001312 


001312 
001312 


001240 
001500 
001506 


001240 


000010 
00001C 


001500 
001560 
001500 


006014 
001500 
176536 


000002 
000001 
001332 
002000 
001332 
000042 
000010 


005413 


001240 
001310 


000002 
000004 
001320 


001236 
001240 


001236 
176454 


176420 


65$: 


643: 


67$: 


218: 
208: 


66$: 
16$: 


7$: 
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TEMP) 
64% 


SAVACT 

65% 
SAVACT, TEMP2 
SAVACT ,DUPACTV 


TEMP2 
#DUPCRO,RO 
#DUPCRI,R1 


TEMP2 


66$ 
(RO)+,(R1) 

#10,(R1)4 
(RO)+,(R1) 

#10, (R1)+ 
(RO)+,(R1)¢ 
7$ 


6 
#DUP .MAP,RO 


#DUP.MAP,RO 
#160050, (RO) 
#770,2(RO) 
#140026,4(RO) 
#5, PRIRTY 
#1,R0 
RO,DUPACTV 
RO,DUPNUM 
RO,SAVACT 
RO,SAVNUM 
RO, TCNFLG 
RO,OPCLRJ 


. XHEAD 


#DUP MAP, TEMP) 
seer terre 


#2, TEMP 
5$ 

#SWOO ,adSWR 
7$ 


3 
#SWO3,aSWR 
3$ 

MINE WW 


Mm 2 





SEQ 0025 


3# OF TIMES 


;CSR 


; VECTOR 
; PARAMETERS 


;SETUP TO CLEAR MAP 
7 CLEAR 

;CHECK FOR FINISH 

:BR IF MORE TO GO 

;SETUP TO DEFAULT 

;LOAD CSR 

;LOAD VECTOR 

;LOAD PARAMETERS AND SYNC 
;LOAD PRIORITY 

SAVE CORE THIS WAY 
PRESET PROGRAM CONTROLS 
:DITTO 

:DITTO 


] 
] 
] 


CoCo 
Se) 
nt 
ooo 


TYPE HEADER 

:SET POINTER 

SET DATA 

ALL DONE WITH DATA 


[UPDATE POINTER 


Ht were RUNNING UNDER MONITOR 
Y 
SELECT SPECIFIC DEVICES?? 


;BR IF 
; TYPE THE MESSAGE. 







N 2 
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1094 002570 005000 CLR RO ; ZERO DATA LIGHTS 
1095 002572 000000 HALT sWAIT FOR USER TO TELL WHAT DEVICES TO RUN 
1096 002574 127737 176402 001312 CMPB @SWR,SAVACT :1S THE NUMBER VALID? 
1097 002602 101404 BLOS 2$ ;BR IF NUMBER IS OK. 
1098 002604 104402 005254 TYPE MERRS :TELL USER OF INVALID NUMBER. 
1099 002610 000000 HALT :STOP EVERY THING. 
1100 002612 000776 BR 72 sRESTART THE PROGRAM AGAIN. 
1101 002614 117737 176362 001310 2%: MOVB aSWR ,DUPACTV :GET NEW DEVICE PATTERN 
02 002622 113700 001310 MOvVB DUPACTV,RO :SHOW THE USER WHAT HE SELECTED. 
03 002626 042700 177400 BIC #*C<377>,R0 sUSE ONLY LOW BYTE. 
04 002632 000000 HALT sCONTINUE DYNAMIC SWITCHES. 
05 002634 012700 000300 3$: MOV #300,R0 ° :PREPARE TO CLEAR THE FLOATING 
06 002640 012701 000302 MOV #302,R1 sVECTOR AREA. 300-776 
07 002644 010120 43: MOV R1,(RO)* START PUTTING ‘‘PC+#2 = HALT” 
08 002646 005021 CLR (R1)¢ 3s IN VECTOR AREA. 
09 002650 022021 CMP (RO)+,(R1)¢ :POP POINTERS 
10 002652 022700 001000 CMP #1000,R0 ;ALL DONE?? 
} 002656 001372 BNE 4% :BR IF NO. 
+ ;TEST START AND RESTART 
& j Sounneeenocenceseneesee 
15 
16 002660 012737 000340 177776 .BEGIN: MOV #340,PS sLOCK OUT INTERRUPTS 
17 002666 012706 001150 MOV MSTACK,SP >SET UP STACK 
18 002672 005737 00042 TST a#42 :1S PROGRAM UNDER MONITOR CONTROL 
19 002676 001023 BNE 2$ ;BR IF YES 
20 002700 032.77 000004 176274 BIT #BIT2,aSwWR :CHECK FOR LOCK ON TEST 
21 002706 001411 BEQ 1% ;BR IF NO 1 OCK DESIRED. 
22 002710 104402 005312 TYPE »MLOCK sTYPE LOCK SELECTED. 
23 002714 012737 000240 003174 MOV #NOP,TTST sADJUST SCOPE ROUTINE. 
24 002722 012737 000240 003176 MOV #NOP,TTST#2 :SET UP TO LOCK 
25 002730 000406 BR 2% ;CONTINUE ALONG. 
20 002732 013737 003306 003174 18: MOV BRW,TTST :PREPARE NORMAL SCOPE ROUTINE 
27 002740 013737 003310 003176 MOV BRX,TIST#2 .. : sLOCK NOT SELECTED, SET UP FOR NORMAL SCOPE LOOP 
28 002746 012737 006224 001214 2%: MOV MCYCLE,RETURN © START AT “'CYCLE’’ FIND WHICH DEVICE TO TEST 
29 002754 104402 005202 TYPE _MR s TYPE R 
120 002760 000177 176230 JMP RETURN : >START TESTING 





a 





B 3 
CZDPCC = MACY1) 3S0A(1052) 26-FEB-79 09:37 PAGE 28 SEQ 0027 
CIDPCD. PT OB-FEB-79 13:15 END OF PASS ROUTINE 
1131 SEND OF PASS 
1132 > TYPE WAME OF TEST 
113% sUPDATE PASS COUNT 
1134 sCHECK FOR EXIT TO ACT-11 
Ne RESTART TEST 
6 
1137 002764 005037 001234 EOP: CLR LSTERR sCLEAR LAST ERROR PC 
1138 002770 105037 001341 CLRB ERRFLG sCLEAR ERROR FLAG 
1139 002774 005237 001230 INC PASCNT UPDATE PASS COUNT 
1140 003000 013777 001230 176172 MOV PASCNT,@DISPLAY ;DISPLAY PASS COUNT 
1141 003006 104402 005157 TYPE ,MEPASS ; TYPE END PASS 
1142 003012 104402 005341 TYPE MCSRX TYPE CSR 
1143 003016 104411 003120 CNVRT =, XxCSR SHOW IT 
1144 003022 104402 005347 TYPE MVECK TYPE VECTOR 
1145 003026 104411 003136 CNVRT =, XVEC SHOW IT 
1146 003032 104402 005355 TYPE »MPASSX s TYPE PASSES 
1147 003036 104411 003144 CNVRT ,xXPASS SHOW IT 
1148 003042 104402 005366 TYPE ,MERRX TYPE ERRORS 
1149 003046 104411 003152 CNVRT ,XERR SHOW IT 
1150 003052 105337 001313 DECB SAVNUM ;ARE ALL DEVICES TESTED? 
1151 003056 001017 BNE RESTRI BR IF NO. 
1152 003060 112737 000377 001343 MOVB #377,QV.FLG ;SET THE QUICK VERIFY FLAG. 
1153 003066 113737 001311 001313 MOVB DUPNUM,SAVNUM ;RESTORE THE COUNT 
11546 003074 013701 000042 MOV a442,R1 sCHECK FOR ACT=11 OR DDP 
1155 003100 001406 BEQ RESTRT :1F NOT, CONTINUE TESTING 
1156 003102 000005 RESET >STOP THE SHOW--CLEAR THE WORLD 
1157 003104 SENDAD: 
1158 003104 004711 JSR PC,(R1) 
1159 003106 000240 NOP 
1160 003110 000240 NOP 
1161 003112 000240 NOP 
1162 003114 000240 NOP 
1163 003116 012737 006224 001214 RESTRI: MOV #CYCLE RETURN 
1164 003124 000137 006224 JMP CYCLE 
1165 003130 0060001 XCSR: 1 
1166 003132 006 002 -BYTE 6,2 
1167 003134 001404 RXCSR 
1168 003136 000001 XVEC: 1 
1169 003140 003 002 -BYTE 3,2 
1170 003142 001374 DUPRVC 
1171 003144 000001 KPASS: 1 
1172 003146 006 002 -BYTE 6,2 
1173 003150 001230 PASCNT 
1174 003152 000001 KERR: 1 
1175 003154 006 002 -BYTE 6,2 
in 003156 001232 ERRCNT 
He 7SCOPE LOOP AND INTERATION HANDLER 
1 
1180 003160 005037 001234 -SCOPE: CLR LSTERR :CLEAR LAST ERROR PC 
1181 003164 010016 MOV RO, (SP) SAVE RO ON STACK 
1182 003166 032777 040000 176006 Bil #B1T14,aSwWR ;LOOP ON TEST? 
1183 003174 001407 TTST: BEOQ 1$ sBR IF NO (CIF LOCK SWOl = 1;THiS LOCATION = 240) 
1184 003176 000437 BR 3$ :60 TO 3$ (DITTO) 
1185 003200 105777 176000 TSTB aTKCSR 7KYBD DONE? 
1186 003204 100034 BPL 3$ :BR IF NO (LOCK: HIT A KEY ON TI¥ 10 GO TO NEXT TEST) 


CZDPCC MACY11 30A(1052) 


CZDPCD.P11 
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003310 


003312 


003334 


003336 


003406 
003410 


003412 
003414 


0034 36 
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017700 
5 


000437 
032777 
000002 


010546 


012704 


175774 
004600 
001343 


001224 
001224 


001341 
601224 
001220 


000050 
001216 


175706 


001000 
001220 
001220 


000002 
000002 
010090 


005136 
175612 


175606 


000004 
000002 


006160 


175760 


001222 


001 
001 


Mn 
—M 
re 


175662 


000002 
175622 


0603434 
000004 


END OF PASS ROUTINE 


1$: 


2$: 


3$: 


BRW: 
BRX: 


-SCOP1: 


INSTR: 


INSTI: 
MSG: 


aTKDBR,RO 
2$ 
#SW11,aSWR 
2$ 

QV.FLG 

2$ 


LPCNT 
LPCNT, 1 COUNT 
3$ 


ERRFLG 
LPCNT 

LOCK 
#50, 1 COUNT 
NEXT RETURN 
<SP), 


@RE TURN 


CLR DONE BIT 
; CONTINUE 
;DELETE ITERATION (QUICK PASS)? 
;BR IF YES 

HAS FIRST PASS BEEN COMPLETED? 
:BR IF QUICK VERIFY 

;UPDATE ITERATION COUNTER 

;ALL ITERATIONS DONE? 

BR IF NOT YET 

;PREPARE FOR NEW TEST 

START ICOUNT AT ZERO 


RESET ITERATIONS 
sGET NEXT TEST 
;POP 80 OFF STACK 
FAKE AN RTI 

3GO DO THE TEST 


s TELETYPE OUTPUT ROUTINE 


#SWO9,aSWR 
1$ 

LOCK 

1$ 

LOCK, (SP) 


R5,-(SP) 
a2(SP),R5 
#2,2(SP) 
#SW12,aSWR 
3$ 


$ 
(R5)+*,aTPDBR 
1$ 
(SP)+#,R5 


31S SWO9=1(SET)? 
;BR IF NOT SET. 


;GOTO THE ADDRESS IN LOCK. 
3GU BACK. 


SAVE R5 ON THE STACK. 

;GET ADDRESS OF MESSAGE. 

;POP OVER ADDRESS. 

; INHIBIT ALL PRINT OUT?? 

:BR IF NO PRINT OUT WANTED (SW12=1) 
1S NUMBER MINUS? (MSB=1(BIT7)) 
;BR IF NUMBER IS PLUS 

cs TYPE A CR/LF! 

TTY READY? 

;BR IF NO. 

>PRINT CURRENT CHAR. 

:1F NOT ZERO KEEP PRINTING! 
sEND OF OUTPUT. RESTORE R5 

GO HOME 


R3,-(SP) 
R4,-(SP) 
4(SP),.MSG 
#2,4(SP) 


#INBUF RG 


;SAVE R3 ON STACK 
sSAVE R4& ON STACK 





SEQ 0028 


7 
EE EEE 
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003442 


003534 


003536 


003654 


08-FEB-79 1 


dD 3 
“07 FEB-79 09:33 PAGE 30 
13:15 END OF PASS ROUTINE 
000007 MOV #7 ,R3 
175832 1$: TSTB aTKCSR 
; BPL 1$ 
175526 MOVB @TKDBR, (RS) 
000200 BICB #200, (R4) 
000015 CMPB (R4)+, #15 
BEQ INSTR2 
175512 23: TSTB aTPCSR 
BPL 2s 
175502 175504 MOV @TKDBR,aTPDBR 
DEC R3 
BNE 
MOV (SP)+,R4 
MOV (SP)+,R3 
-INSTE: MOV R3,-(SP) 
MOV R4,-(SP) 
005132 TYPE MQM 
BR INSTI 
INSTR2: MOV (SP), RG sRESTORE R& 
MOV (SP)+,R3 sRESTORE R3 
RTl 
s;CONVERT ASCII STRING TO OCTAL 
.PARAM: MOV R5,-(SP) 
MOV R4,-(SP) 
000004 MOV 4(SP),&85 
003726 MOV (R5)+,LOLIM 
003730 MOV (R5)+,HILIM 
003732 MOV (R5)+,DEVADR 
003734 MOVB (R5)+,LOBITS 
003735 MOVB (R5)+,ADRCNT 
000004 MOV R5,4(SP) 
PARAM]: CLR R5 
006160 MOV #INBUF ,RS 
000015 CMPB #15, (R4) 
BEQ PARERR 
000060 1$ CMPB (R4) ,#60 
BLT PARERR 
000067 CMPB (R4) , #67 
BGT PARERR 
000060 BICB #60, (R4) 
B1SB (R4)4*,R5 
000015 CMP8 #15, (R4) 


ASL R 

ASL R5 

ASL R5 
1$ 


BR 
PARERR: INSTER 
BR PARAM] 


;TEST TO SEE IF NUMBER JS WITHIN LIMITS 


SEQ 0029 


Ee 


Se 


..3 
CZDPCC MACY11 30A(1052) 26-FEB-79 09:33 PAGE 31 SEQ 0030 
CZDPCD.P11 O8-FEB-79 13:15 END OF PASS ROUTINE 
1299 003656 020537 003730 LIMITS: CMP RS, HILIM 
1300 003662 101373 BHI PARERR 
1301 003664 920537 003726 CMP R5,LOLIM 
1302 003670 103770 BLO PARERR 
1303 003672 133705 003734 BITB LOBITS,R5 
saps 003676 001365 BNE PARERR 
Hf 9 s;STORE NUMBER AT SPECIFIED ADDRESS 
1308 003700 013704 003732 MOV DEVADR,R4 
1309 003704 010524 1$: MOV RS, (R4)* 
1310 003706 062705 000002 ADD #2,R5 
1311 003712 105337 003735 DECB ADRCNT 
1312 003716 001372 BNE 1$ 
1313 003720 012604 MOV (SP)4+,R4 
1314 003722 012605 MOV (SP)+,R5 
1315 003724 000002 RT] 
13i6 003726 000000 LOLIM: 0 
1317 003730 000000 HILIM: 0 
1318 003732 000000 DEVADR: 0 
1319 003734 000000 LOBITS: 0 
3 003735 ADRCNT=LOBITS¢1 
1322 ;SAVE PC OF TEST THAT FAILED AND RO=R5 
+ 34 pn nn nnn nnn n nee ennenn= 
4 
43% 003736 016637 000004 001266 .SAVOS: MOV 4(SP),SAVPC :SAVE R7 (PC) 
6 
ee 7SAVE RO-RS | 
1329 003744 010537 001262 Sv05: MOV R5,SAVRS5 SAVE R5 
1336 003750 010437 001260 MOV RG, SAVR4 SAVE RG 
1331 003754 010337 001256 MOV R3,SAVR3 sSAVE R3 
1332 003760 010237 001254 MOV R2,SAVR2 SAVE R2 | 
1333 003764 010137 001252 MOV R1,SAVR1 SAVE R1 
1334 003770 010037 001250 MOV RO,SAVRO 7 SAVE RO 
fa 003774 00000? RT] sLEAVE. 
1336 
ee sRESTORE RO-R5 
1339 003776 013700 001250 -RESOS: MOV SAVRO,RO sRESTORE RO 
1340 004002 013701 001252 MOV SAVR1,R1 sRESTORE RI 
1341 004006 013702 001254 MOV SAVR2,R2 sRESTORE R2 
1342 004012 013703 001256 MOV SAVR3,R3 RESTORE R3 
1345 006016 013704 001260 MOV SAVR4G,RS RESTORE R4 
1344 006022 013705 001262 MOV SAVR5,R5S sRESTORE R5 
1345 004026 000002 RTI SLEAVE 
1346 
1347 
A xy: :CONVERT OCTAL NUMBER TO ASCII] AND OUTPUT TO TELEPRINTER 
1 49 2 weeereere reer eee eee eee eee eee ee eeeeee=s ewreerereeee eer eereseeeeee 
1350 

1351 004030 106402 0605136 .CONVR: TYPE »MCRLF 

1352. 004034 010046 ~CNVRT: MOV RO,-(SP) 

1353 004036 010146 MOV R1,-(SP) 

1354 004040 010346 MOV R3,-(SP) 


CZDPCC MACY11 30A(1052) 
CZOPCD.P11 08-FEB-79 | 


1355 004042 010446 


1358 004052 062766 
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Ww 
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Ww 

So 

oO 

Fa 
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oO 

eo 
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1380 004156 105337 
1381 004162 001374 
1382 004164 105737 
1383 004170 001405 
1384 004172 112723 
1385 004176 105337 
1386 004202 001373 
1387 004204 105013 
1388 004206 104402 


1398 004236 000000 
1400 004240 000000 


1408 004242 017605 
1409 004246 042737 
1610 004254 122737 


Fy “ae -79 09:33 PAGE 32 


END OF PASS ROUTINE 


2 
000002 000012 ADD 


006054 MOV 


177770 BIC 
000060 ADD 


006116 MOV 
4%: MOVB 
004236 DECB 


004237 TSTB 


000040 5$: MOVB 
004237 DECB 


6$: CLRB 
006116 TYPE 
004234 DEC 


WRDCNT: O 
CHRCNT: 0 


SPACNT=CHRCNT*1 


BINWRD: O 


R4,-(SP) 
R5,-(SP) 
a12(SP),R1 
#2,12(SP) 
(R1)4*,WRDCNT 
(R1)+,CHRCN’ 
(R1)4,SPACNT 
a(R1)+,BINWRD 
BINWRD,R4 
CHRCNT,RS 
ten ye 


R4,R 
#177770,R3 
#060,R3 
R3,(RO)* 


RG 


#MDATA,R3 
-(RO),(R3)¢ 
CHRCNT 


6 

#040, (R3)+ 
SPACNT 

5$ 

(R3) 
-MDATA 
WROCNi 

1$ 


(SP)4+,R5 
(SP)+,R4 
(SP)+,R3 
(SP)+,R} 
(SP)+,RO 


sCOMPARE THE FIRST CHARACTER IN THE TELETYPE INPUT 
BUFFER TO THE CHARACTERS ‘'N’' AND ‘‘y"' 
71F THE CHARACTER 1S ‘'N’’ CLEAR THE FLAG 


1F THE CHARACTER IS ‘‘y" 


000000 oSETFLG: MOV 
000040 006160 BIC 
000116 006160 (MPB 


SET THE FLAG 


a(SP),R5 
#40, INBUF 


#'N, INBUF s¥S 37 “7 


SEQ 0031 


OOOO ee 


ens 
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004262 


004314 


004316 


004 346 


004350 
004 356 
004 360 
004 364 
004 366 
004374 
004402 
004404 
004410 
004412 
004416 
004422 
004424 
004426 
004432 
0044 34 
0044 36 
004440 
004442 
004446 
004452 
004456 
004462 
004466 
004472 
004474 
004500 


O8-FEB-79 | 
001002 


000752 


011646 
162716 
017616 
006316 
042716 
062716 
017616 
000136 


032777 
001406 
105777 


6 3 
26-FEB-79 09:33 PAGE 33 
13:15 END OF PASS ROUTINE P 
BNE 1$ 
CLRB (RS) ~—s 000 
BR 2$ 
00013i 006160 18: CMPB os #'Y, INBUF s1S 11 “y"* ? 
BNE 3$ 
177777 MOVB = #1, (R5) :377 \ 
000002 28: ADD #2, (SP) 
RTI 
3g: INSTER RETRY 
BR “SETFLG 
:TRAP DISPATCH SERVICE 
[ARGUMENT OF TRAP 13 EXTRACTED 
:AND USED AS OFFSET TO OBTAIN POINTER 
[10 SELECTED SUBROUTINE 
.TRPSR: MOV (SP) ,=<SP) :GET PC OF RETURN 
000002 SUB #2, (SP) :=PC OF TRAP 
000000 MOV a(SP), (SP) GET TRP 
TRPOK: ASL (SP) sMULTIPLY TRAP ARG BY 2 
177001 BIC #177001, (SP) =CLEAR UNWANTED BITS 
001344 ADD #. TRPTAB, (SP) :POINTER TO SUBROUTINE ADDRESS 
000000 MOV a(SP), (SP) [SUBROUTINE ADDRESS 
JMP a(sP)s :GO TO SUBROUTINE 
SERROR HANDLER 
010000 174624 .HLT: BIT #SW12,aSWR :BELL ON ERROR? 
BEQ XBX 7BR IF NO BELL 
174624 TSTB. — @TPCSR :TTY READY. 
BPL XBX :DON'T WAIT IF TTY NOT READY. 
000207 174616 MOVB #207, aTPDBR :PUSH A BELL AT THE TTY. 
020000 174600 XBX: BIT #Sw13,aSWR “DELETE ERROR PRINT OUT? 
BNE HALTS :BR IF NO PRINT OUT WANTED. 
001234 CMP (SP) ,LSTERR :WAS THIS ERROR FOUND LAST TIME? 
BEQ 1$ :BR IF YES 
001234 MOV (SP) ,LSTERR :RECORD BEING HERE 
001341 CLRB— ERRFLG [PREPARE HEADER 
1$ SAVOS :SAVE ALL PROC REGISTERS 
MOV (SP) RS :GET THE PC OF ERROR 
000002 SUB #2,R5 :GET ADDRESS OF TRAP CALL 
MOV (R5) RG :GET 4LT INSTRUCTION 
ASL R4 :MULT BY TWO 
ADD RS) RG [DOUBLE IT 
ASL R4 :MULT AGAIN 
177001 BIC #177001,R4 =CLEAR JUNK 
024234 ADD # ERRTAB,R4 GET POINTER 
004566 MOV (RG)*,ERRMSG § :GET ERROR MESSAGE 
004600 MOV (R4)*.DATAHD — :GET DATA HEADRER 
004612 MOV (R4) ,DATABP GET DATA TABLE 
001341 TSTB —ERRFLG :TYPE HEADREER 
BEO TYPMSG :BR IF YES 
004612 TST DATABP sDOES DATA TABLE EXIST? 
BNE TYPDAT “BR IF YES, 


SEQ 0032 


—_—— OOOO 


sti tts ata faiasneneneaeeN 


H 3 
CZDPCC MACY11 30A(1052) 26-FEB-79 09:33 PAGE 34 SEQ 0032 
CZDPCD.P11 O8-FEB-79 13:15 END OF PASS ROUTINE 
1467 004502 104402 005136 TYPMSG: TYPE oMCRLF 
1468 004506 194402 005136 TYPE CRLF 
1469 004512 905737 001220 TST LOCK 
1470 004516 001402 BEQ 1$ 
1471 004520 104402 005411 TYPE /MASTEK 
1472 004524 104402 005377 1$: TYPE /MISTN 
1473 004530 104411 005000 CNVRT =, XTSTN ;SHOW IT 
1474 004534 104402 005466° TYPE ,MERRPC :TYPE PC. 
1475 004540 104411 004772 CNVRT =, ERTABO ;SHOW IT 
1476 004544 104492 005136 TYPE CRLF ;GIVE A CR/LF 
1477 0046550 112757 177777 00134) MOVB #-1,ERRFLG ;NO MORE HEADER UNLESS NO DATA TABLE. 
i478 004556 005737 004566 1ST ERRMSG ;1$ THERE AN ERROR MESSAGE? 
1479 004562 001402 BEQ WRKO.FM ;BR IF NO. 
1480 004564 104402 TYPE ; TYPE 
1481 004566 000000 ERRMSG: 0 ; ERROR MESSAGE 
1482 004570 WRKO.FM: : 
1483 004570 005737 004600 TST DATAHD ;DATA HEADER? 
1484 004574 001402 BEQ TYPDAT ;BR IF NO 
1485 004576 104402 TYPE ; TYPE 
1486 004600 000000 DATAHD: 6 ; DATA HEADER 
1487 004602 005737 004612 TYPDAT: TST DATABP ;DATA TABLE? 
1488 004606 001402 BEQ RESREG ;BR IF NO. 
1489 004610 104410 CONVRT ; SHOW 
1490 004612 000000 DATABP: 0 ; DATA TABLE 
1491 004614 104407 RESREG: RESOS ;RESTORE PROC REGISTERS 
1492 004616 022737 003104 000042 HALTS: CMP WSENDAD,a#42 =; IF ACT=11 AUTO MODE=-HALT!! 
1493 004624 001403 BEQ 1$ 
1494 004626 005777 174350 TST aSwWR ;HALT ON ERROR? 
1495 004632 100035 BPL EXITER ;BR IF NO HALT ON ERROR 
1496 004634 010046 1$: PUSHRO ; SAVE RO 
1497 004636 016600 000002 MOV 2(SP),RO ;SHOW ERROR PC IN DATA LIGHTS 
1498 004642 013746 000004 MOV 4,-(3P) ;SAVE OLD TRAP 
1499 004646 013746 000006 MOV 6,-(SP) 
1500 004652 012737 004710 000004 MOV #22$,4 sFORCE HALT IF TIME=OuT 
1501 004660 012737 000340 000006 MOV #3406 TWHEN REFERENCING TXCSR | 
1502 004666 042777 014000 174516 BIC #SYSTSTIMEXT,@TXCSR 
150% 004674 900000 HALT 7HALT 
1504 004476 012637 000006 MOV (SP)+,6 ;RESTORE TRAP 
1505 004702 012637 000004 MOV (SP)+,4 
1506 004706 000406 BR 33% 
1507 904710 000000 228: HALT sHALT 
1508 004712 022626 CMP (SP)+,(SP)¢ ;POP_ STACK 
1509 004714 012637 000006 MOV (SP)*,6 ;RESTORE TRAP 
1510 004720 012637 000004 MOV (SP)+,4 
1511 004724 012600 33$: POPRO :GET RO 
1512 004726 005237 001232 EXITER: INC ERRCNT ;UPDATE ERROR COUNT: 
1513 004732 032777 000400 174242 BIT #SW08,aSWR :GOTO TOP OF TEST? 
1514 004740 001007 BNE 1$ :BR IF YES 
1515 004742 032777 002000 174232 BIT #SW10,aSWR ;GOTO NEXT TEST? 
1516 004750 001407 BEQ 2$ :BR IF NO 
1517 004752 013737 001216 001214 MOV NEXT, RETURN ;SET FOR NEXT TEST | 
1518 004760 012706 001150 1$: MOV #STACK, SP ;RESET SP 
1519 004764 000177 174224 JMP RETURN :GOTO SPECIFIED TES! : | 
1520 004770 000002 : RT] pRETURN 
1521 004772 000001 ERTABO: 1 | 
1522 004774 006 002 -BYTE 6,2 : 
| ae 



























. aa . 
CZDPCC MACY11 30A(1052) 26-FEB=79 09:33 PAGE 35 SEQ 0034 
CZDPCD.P11 OB-FEB-79 13:15 END OF PASS ROUTINE ie 
1523 004776 001266 SAVPC 
1524 005000 9000001 MTSTIN: 1 
1525 005002 003 602 BYTE 3,2 
1326 005004 001226 TSTNO 
1527 005006 017600 000000 .PKCLK: MOV a(SP),RO :GET THE # OF TICKS TO POKE 
1528 005012 062716 000002 ADD #2, (SP) POP OVER THE # 
15829 005016 1$: 
1530 005016 052777 020000 174366 BIS #CLK @TXCSR :POKE CLOCK UP 
1531 005024 005300 DEC RO :ARE WE DONE? 
1532 005026 001405 BEQO 2$ :YES-GO TO 2$ 
1533 005030 042777 020000 174354 BIC #CLK,aQTXCSR sPOKE CLOCK DOWN 
1534 005036 005300 DEC RO :ARE WE DONE? 
1535 005040 001366 BNE 1$ :NO-REPEAT 
1336 005042 000002 28: R11 = RETURN 
1538 
1539 sWAIT ROUTINE 
1540 005044 000240 SMALL: NOP SSTALL 
9g 905046 000207 RTS PC > RETURN 
1365 POWER FAIL ROUTINE 
4 
1545 605050 012737 005060 000024 .PFAIL: MOV #PWRUP, 24 LOAD PFAIL VECTOR FOR POWER UP 
1546 005056 000000 HALT : 
1547 005060 000005 PWRUP: RESET sWALT TTY TO COME UP 
1548 005062 012706 001150 MOV a@STACK,SP :REINIT STACK POINTER | 
1549 005066 012737 005050 000024 MOV #.PFAIL,24 LOAD PFAIL VECTOR FOR POWER DOWN 
1550 005074 104462 TYPE 
-1551 005076 005141 MPOWER 
1552. 005100 000177 174110 JMP ORE TURN 
1335 SCLRVEC,ROUTINE TO FILL COMMUNICATION VECTOR AREA WITH .*2,HALT 
4 
1555 005104 012702 000300 CLRVEC: MOV #300,R2 :R2 COMM VECTOR AREA ADRS 
1556 005110 012701 000302 MOV #302,R1 INIT R1 WITH ADRS OF HALT 
1557. 005114 010122 1$: MOV R1,(R2)¢ MOV .#2 TO PC 
1558 005116 9005022 CLR (R2)¢+ :MOV HALT TO PC 
1559 005120 022121 CMP (R1)+,(R1)¢ INC TO NEXT VECTOR AREA 
1560 005122 022701 000776 CMP #776,R1 :END OF VECTOR AREA | 
1561 005126 001372 BNE 1$ :NO 
1562 005130 000207 RTS PC s RETURN 
1563 
1564 
1565 
1566 005132 020040 000077 MOM: ASCIZ / 77 
(2) 005136 005015 000 MCRLF: .ASCIZ <15><12> 
(2) 005141 377 053520 020122 MPOwER: .ASCIZ <377>/PWR FAILED. / 
(2) 005157 015 042777 042116 MEPASS: .ASCIZ <15><377>/END PASS CZDPCC / 
(2) 005202 051377 000 MR: ASCIZ <377>/R/ 
(2) 005205 377 051120 043517 MERR2: .ASCIZ <377>/PROGRAM INDICATES NO DEVICES PRESENT. / 
(2) 005254 044777 051516 043125 MERR3: .ASCIZ <377>/INSUFFICIENT DATA 
(2) 005300 052377 051505 020124 MTSTPC: .ASCIZ <377>/TEST PC-/ 
(2) 005312 046377 041517 020113 MLOCK: .ASCIZ <377>/LOCK ON SELECTED TEST/ 
(2) 005341 103 051123 020072 MCSRX: .ASCIZ /CSR: / 
(2) 005347 126 041505 020072 MVECX: .ASCIZ /VEC: / 
(2) 005355 120 051501 042523 MPASSX: .ASCIZ /PASSES: / 
(2) 005366 051105 047522 051522 MERRX: .ASCIZ /ERRORS: / 


005377 


006014 
006042 
006044 
006046 
006050 
006052 
006054 
006116 
006160 


006222 
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001240 


000000 


000001 


020124 


047440 
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SEQ 0035 


END OF PASS ROUTINE 


MTSTN: 


MASTEK: 


TRP, PO! « 


-ASCIZ 


Ae ga NO: / 
ra a SWITCH REG TO DUPI''S DESIRED ACTIVE./ 


As an CSR ADRS / 

<377>/VEC ADRS / 

<377>/1S THE OPTIONAL CLR JMPR IN? (¥ OR N} / 
<377>/1S THE H325 CONNECTOR ON? (Y OR N) / 
<377>/# OF DUP'S (CIN OCTAL) / 

<377>/PRIORITY (4 10 7) / 

<377>/SEC TX JMPR IN? (Y OR N) / 

<377>/SEC RX JMPR IN? (Y OR N) / 

<377>/MAP OF DUPI1 STATUS/<377> 


6,3 
6,2 





i a ea eo SM lle hee 
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006224 
006230 


006524 


08-FEB-79 


105737 


062737 


001310 
005205 


001314 


001314 
001314 
000006 
001560 


001500 


001314 


001560 


001500 


001426 
001374 


001310 


001316 
001316 


001316 


001424 
001406 
001416 
001410 
001422 


001420 
001412 


001430 
001414 
001426 


001376 


* CYCLE: 


END OF PASS ROUTINE 


;ROUTINE USED TO "'CYCLE’’ THROUGH UP TO EIGHT DUPI1'S 
; THIS ROUTINE SETS UP THE CONTROL ADDRESS FOR THE DIAGNOSTIC 


;AND RUNS THE SPECIFIED DUPI1°'S. 


THIS ROUTINE *MUST® 


;BE RUN FIRST BEFORE ENTERING THE DIAGNOSTIC FOR THE 


; SETUP NECESSARY. 


TS1B DUPACTV 
BNE 1$ 
TYPE »MERR2 
HALT 
BR 72 
1$: BITB RUN, DUPACTV 
BNE 2% 
CLC 
ROLB RUN 
ADCB RUN 
ADD #6,CREAM 
CMP #DUP.END, CREAM 
BNE 1$ 
MOV #DUP.MAP, CREAM 
BR 1$ 
2$: CLC 
ROLB RUN 
ADCB RUN 
MOV CREAM,RO 
ADD #6,CREAM 
CMP #DUP.END, CREAM 
BNE 3$ 
MOV #DUP.MAP, CREAM 
3$: MOV (RO)+,RXCSR 
MOV (RO) + ,DUPRVC 
MOV (RO)+,L00.00 
MOV #2,R0 
MOV a 
INC HUPRCR 
MOV ee RXDBUF 


INC RXDBUF 


MOV RXDBUF ,DUPSEC 
MOV RXDBUF ,PARCSR 
MOV RXOBUF , HUPRBF 
INC HUPRBF 

MOV HUPRBF ,HUPPSR 
MOV HUPPSR,TXCSR 

INC TXCSR 

MOV TXCSR,HUPTCR 

INC HUPTCR 

MOV HUPTCR, TXDBUF 
INC TXDBUF 

MOV TXDBUF , HUPTBF 
INC HUP TBF 

MOV DUPRVC ,DUPRPS 


;ARE ANY DUP11'S TO BE TESTED? 
BR IF OK 


3NO DUPI1" S SELECTED!! 
;STOP THE SHGwW. 
:DISQUALIFY CONT. Sw. 
31S THIS ONE “‘ACTIVE'’ 
:;BR IF GOOD ONE FOUND. 
;CLEAR PROC. CARRY BIT. 
; UPDATE POINTER 

;CATCH CARRY FROM RUN 

; UPDATE ADDRESS POINTER. 


;KEEP GOING; NOT ALL TESTED FOR. 
:RESET ADDRESS POINTER 

:KEEP LOOKING FOR ACTIVE DUPI1 
:CLEAR PROC. CARRY. 

; UPDATE POINTER. 

CATCH CARRY. 

;GET ADDRESS POINTFR. 

; UPDATE. 


:ALL DONE? 

;BR IF NO. 

sRESTORE POINTER. 

;LOAD SYSTEM CTRL. REG 
;LOAD VECTOR 

;GET PARAMETERS 

SAVE CORE THIS WAY! 

GET CONTROL REG HIGH BYTE 


IT 
:GET + CONTROL REG BUFFER 
; SECONDARY REG SELECT REG 
;GOT PARAMETER STATUS REGISTER 
:GET BUFFER HIGH BYTE 


:GOT PAR STATUS REG HIGH BYTE 
; He CONTROL REGISTER 


] 

Hs CONTROL REG HIGH BYTE 
in BUFFER 

7 BUFFER HIGH BYTE 


sRX VECTOR 


SEG 0036 






























006532 


906556 


006562 


006726 


006730 
006736 


V06742 
006744 
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060037 


104402 
000734 


012737 
000177 


011003 
000207 


26-FEB-79 09:33 PAGE 38 
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001376 


001402 


001434 
001432 
001433 
006742 
000042 
000002 


005136 


007356 
012737 


001226 
001226 
001214 
005136 
005202 
022546 
005132 


007356 
172252 


001400 
001402 


172364 


000002 
000004 


001214 


END OF PASS ROUTINE 
ADD RO,DUPRPS 3RX PRIORITY LEVEL 
MOV DUPRPS ,DUPTVC 
ADD RO,DUPTVC :1X VECTOR 
MOV DUPTVC ,DUPTPS 
ADD RO,DUPTPS 31X PRIORITY LEVEL 
MOV #L00.00,R0 ;LOAD STAUS 00-00 
MOV #MASK.A,R1 ;PREPARE MASK. 
MOV #CLK.A,R2 sPREPARE CLOCKS 
JSR PC,F1IX.00 3;GO AND CALCULATE CONFIGURATION. 
TST a#42 
BNE 4% 
BIT #SWO1,aSwWR s1F SWO1=1,GET STARTING TEST @ 
BEQ 4$ 
7$: TYPE »MCRLF 
INSTR sOUTPUT MESSAGE & GET INPUT STRING 
MTISTN > MESSAGE 
PARAM ; CONVERT STRING 
1 sLOW LIMIT 
1000 sHIGH LIMIT 
TSTNO s;STORE AT THIS LOCATION 
-BYTE 0 > MASK 
.BYTE 1 sHOW MANY TIMES ¢ 2 
MOV #TST1,R0 
5$: CMP #12737, (RO) 
BNE 6$ 
CMP TSTNO,2(RO) 
BNE 6$ 
CMP #TSTNO,4(RO) 
BNE $ 
MOV RO, RETURN > SAVE PC 
TYPE »MCRLF 
TYPE MR 
BR 8% 
6$: TST (RO)+ 
CMP RO, #TLAST+10 
BNE 5$ 
TYPE ,MOM 
BR $ 
4$: MOV #1TST1,RETURN sPREPARE RETURN ADDRESS 
8$: JMP @RETURN :GO START TESTING. 
F1X.00: MOV (RO) ,R3 3;GET PARAMETERS. 
5$: RTS PC : 








SEQ 0037 E 


CZDPCC MACY11 30A(1052) 26-FEB-79 09:33 PAGE 39 SEQ 0038 
CZDPCD.P11 OB-FEB=-79 13:15 END OF PASS ROUTINE 
1683 
1684 
1685 
1686 
1687 sROUTINE TO DETERAINE IF BIT STUFFING IS REQUIRED 
189 Pee ee es oe eee 
1690 006746 012737 000019 001326 STUFCK: MoV #8., SHIFTS 
1691 006754 013700 001324 MOV DATA,.RO 
1692 006760 012701 000200 MOV #200.R1 
1693 006764 006000 1$: ROR RO 
1694 006766 005537 001330 ADC MIND 
1695 006772 022737 000005 001330 CMP #5 ,MIND 
1696 007000 003004 BGT 2$ 
1697 007002 005037 001330 CLR MIND 
1698 007006 005237 001326 INC SHIFTS 
1699 007012 006001 28: ROR RI 
1700 007014 103363 BCC 1$ 
1701 007016 000207 RTS PC 
1702 
1703 
1704 3; THIS ROUTINE POKES THE RECEIVER BIT WINDOW 
1705 ;BASED ON THE INFORMATION IN DATA AND SHIFTS 
1709 SEEGER EBLE QUITS OE: 
1708 007020 042777 002000 172364 RPOKE: BIC #BITW,aTXCSR 
1709 007026 006037 001324 ROR DATA e 
1710 007032 103003 BCC 1$ : 
1711 007036 052777 002000 172350 BIS #B1Tw,aTXCSR 
1712 007042 000240 1$: NOP 
1713 007044 104412 000002 PKCLK 2 
1714 007050 005337 001326 DEC SHIFTS 
1715 007054 001361 BNE RPOKE 
1716 007056 000201 RTS RI : 
te 
1719 007060 012137 001244 RFLG: MOV (R1)+, TEMPS ;GET THE # OF FLAGS 
1720 007064 005037 001246 1$: CLR TEMPS ;CLEAR ONES COUNT 
1721 007070 042777 002000 172314 BIC WBITW,aTXCS® © :SET FIRST BIT 
1722 007076 104412 000002 PKCLK “PUSH OUT THE BIT 
1723 007102 052777 002000 172302 28: BIS WBITW.aTXCSR LOAD THE BIT 
1724 007110 104412 000002 PKCLK 42 “PUSH OUT THE BIT 
1725 007114 005237 001246 INC TEMPS s INCREMENT 1°S COUNTER 
1726 007120 022737 000006 001246 CMP #6, TEMPS ;DID WE PUSH OUT 6 ONES 
1727 007126 001365 BNE 2$ ‘NO=GO BACK 
1728 007130 042777 002000 172254 BIC WBITW,aTXCSR SET THE LAST BIT 
1729 007136 104412 000002 PKCLK all ;PUSH OUT THE BIT 
1730 007142 005337 001244 DEC TEMP ;ARE WE DONE WITH FLAGS? 
1731 007146 001346 _ BNE 1$ ;BR IF NO 
1732 007150 000201 RTS R1 
3a 
4 
1735 007152 012137 001244 SFLG: MOV (R1)*, TEMPS GET THE # OF FLAGS 
1736 007156 005037 001246 1$: CLR TEMPS “CLEAR ONES COUNT 
1737 007162 052777 002000 172222 28: BIS #BITw,aTXCSR  :LOAD THE BIT 
1738 007170 104412 000002 PKCLK 2 ‘PUSH OUT THE BIT | 
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1739 007174 005237 001246 INL TEMPS ; INCREMENT 1°S COUNTER 
1740 007200 022737 000006 001246 CMP #6, TEMPS :D1D WE PUSH OUT 6 ONES 
1741 007206 001365 BNE 2$ 3NO-GO BACK 
1742 007210 042777 002000 172174 BIC #BITW,aTXCSR [SET THE LAST BIT 
1743 007216 104412 000002 : PKCLK ,2 ;PUSH OUT THE BIT 
1744 007222 005337 001244 : DEC TEMPS ;ARE WE DONE WITH FLAGS? 
1745 007226 001353 : BNE 1$ ;BR IF NO 
Hg 007230 000201 RTS R1 
| 
1748 007232 012577 172136 SETVEC: MOV (R5)+,aDUPRVC 
1749 007236 012577 172136 MOV (R5)+,aDUPTVC 
1750 007242 112577 172130 MOVB (R5)+,a@DUPRPS 
1751 007246 112577 172130 ‘ MOVB (R5)¢*,a@DUPTPS 
1752 007252 000205 RTS R5 
1753 007254 , NO.ATRAP: 
1754 007254 104025 HLT 25 
1755 007256 000002 RTI 
1756 
1757 007260 NO.BTRAP: 
1758 007260 104026 HLT 26 
1844 007262 9000002 RTI 
1761 s THIS ROUTINE PICKS UP THE ADDRESS OF 
1762 ;THE JUMPER TABLE AND LOADS R5 WITH 
1763 ;THE CORRECT DATA BASED ON THE STATE 
thes OF THE JUMPER AND CONNECTOR FLAGS. 
6 j Cwsaneeeoresessrssssooessessossosose2 
1766 ; 
1767 007264 012100 JUMPER: MOV (R1)+,RO :GET THE TABLE ADDRESS 
1768 007266 105737 001322 TSTB TCNFLG ; TEST THE TURN AROUND CONNECTOR FLAG 
1769 007272 001406 BEQ 2$ ;BRANCH IF CONNECTOR IS MISSING 
1770 007274 105737 001323 TSTB OPCLRJ ; TEST CLEAR JMPER FLAG 
1771 007300 001403 BEQ 2$ [BRANCH IF JMPER IS MISSING 
1772 007302 011005 MOV (RO) ,R5 ;MOVE THE DATA TO R5, BOTH JUMPER 
1773 AND CONNECTOR ARE THERE 
1774 007304 000137 007330 JMP 5$ 
1778 007310 022020 2$: CMP (RO)+,(RO)* POP POINTER 
1776 007312 105737 001323 TSTB OPCLRJ : TEST CLEAR JMPER FLAG 
1777 007316 001403 BEQ 3$ [BRANCH IF MISSING 
1778 007320 011005 MOV (RO), R5 ;MOVE DATA= JUMPER IN, CONNECTOR OFF 
1779 007322 000137 007330 JMP 5$ 
1780 007326 012005 3$: MOV (RO)+,R5 >NO CONNECTOR OR JUMPER 
4d 007330 000201 5$: RTS R1 ; RETURN 
1783 007332 012100 OJUMPER: oat (R1)+*,RO ;GET THE POINTER ADDRESS 
1764 007334 105737 001322 TSTB TCNFLG ; CHECK FOR TURNAROUND CONNECTOR 
1785 007340 001403 BEQ 4$ 3 :BR IF MISSING 
1786 007342 011005 MOV (RO) ,R5 ;MOVE THE INFO TO R5 
1787 007344 000137 007354 JMP 6$ G0 BACK 
1788 007350 022020 4$: CMP (RO)*,(RO)* ;POP POINTER 
1789 007352 011005 MOV (RO) ,R5 [LOAD DATA TO RS 
i 007354 000201 6$: RTS R1 pRETUN 
1792 peeerereceerrrcrerereresete TEST 1 eeeeeveneeeseeserenereseses 
179% Teles! TO PROVE THE INTERACTION OF RECEIVER ENABLE: 


tewlTH RECEIVER ACTIVE AND RECEIVE START 


_ 
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007356 
007364 


007436 


607442 
007444 


007524 
007526 


007616 
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032713 
001401 


000001 
007640 


007060 
004000 


001324 


000200 
000200 


000400 


900400 
001406 


001404 
004000 


001324 


000200 
000200 


000400 


000400 
001406 


001226 
001216 
172012 


171772 
171762 


001326 


171676 


001326 


171602 


B 4 


SEQ 0040 


TEST OF et ENABLE ,RXACT,AND RSOM IN PRIMARY MODi 
;*OF MESSAGE IN PRIMARY MODE. 


; :eeeeeererrerrereerrerrererererreeeeeaeereneeeeeeTereeeseeeeeTe 


> TEST 1 


e 


. 
ae @eeereerreere 
- ;@eeeraerererrrerrerrreretererererteretereeeetenetetereneteteeeeteeeeeee 


iST1: 


MOV 


#1,a#TSTNO 
#1ST2,NEXT 
WMRESET ,ATXCSR 
PC, SMALL 
RXCSR,R5 
#CRCEN,@PARCSR 
#RCVEN, (R3) 
#MMODE ,AaTXCSR 
R1,RFLG 


MRECACT,(R3) 
1$ 

6 

DATA 

#9. ,SHIFITS 
R1,RPOKE 
#RXDONE , (R3) 
2$ 


#RXDONE ,R5 
(R3) ,R4 


3 

#RSOM, ARXDBUF 
3$ 

#RSOM,RS 


RXDBUF ,R3 
(R3),R4 


sRESET THE DEVICE 

WAIT FOR RESET TO FINISH 

GET THE RECEIVER CONTROL REGISTER 
: TURN OFF CRC 

; TURN ON THE RECEIVER 

sENTER M/MODE 

;PUSH OUT A FLAG 


:RXACT SHOULD BE CLEAR WHEN READING FLAG CHAR. 
| 


:BRANCH IF BIT IS OFF 
;BIT WAS SET - SHOULD BE CLEAR 
;SETUP FOR CHAR 
:POKE CLOCK SETUP 
PUSH DATA INTO RECEIVER 
TEST DONE 
:BR IF SET 
;ERROR MSS SETUP 
;SET UP FOUND 
;RXDONE FAILED TO SET 
:RSOM SHOULD BE SET 
:BR IF SET 
SET EXPECTED 
:SET UP ERROR MSG 
doh F OUND 
FAILED TO SET 


RSOM 
SIL IAL UTA AA ATLA TTA TTL AAT LLL TL TTA TTA LAAT ALT i +C 
3$: MOV RXCSR,R3 


4$: 


‘ 


wRECACT, o(R3) 


14 

DATA 

#9. SHIFTS 
R1,RPOKE 
#RXDONE , (R3) 
5$ 


#RXDONE ,R5 
‘hes 


#RSOM,ARXDBUF 
10$ 
#RSOM,R5 


RXDBUF ,R3 
(R3),R4 


;SHOULD BE SET FOR START OF FRAME 
:BR IF SET 


FAILED TO Se! 

;SETUP FOR CHAR 

:POKE CLOCK SETUP 

;PUSH DATA INTO RECEIVER 
:RXDONE SHOULD BE SET 
:BR IF SET 

s;ERROR MSG SETUP 

SET UP FOUND 

s;RXDONE FAILED TO SET 
:RSOM SHOULD BE CLEAR 
:THIS 1S SECOND DATA CHAR OF FRAME 
:SE1T EXPECTED 

;SET UP ERROR MSG 

7SET FOUND 


CZDPCC = MACY11 30A(1052) 
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007620 


007622 


007636 


007640 
007646 


007726 


007732 
007734 
007736 
007740 


007742 
007746 
007750 


007752 
007756 


O8-FEB-79 13:1 
104032 


013703 00 
032713 00 
001001 
104014 
104400 


012737 


032713 


001403 
005005 
011304 
104003 


032713 
001401 
104003 
065037 00 


004137 - 00 


000002 


000011 
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1404 
4000 


171510 


171476 
171472 


007060 
004000 


000200 


1324 
001326 
7020 


004000 
004000 


000200 


000200 


C 4 
42 
TEST OF REC ENABLE,RXACT,AND RSOM IN PRIMARY MODE 


HLT 32 sRSOM FAILED TO CLEAR 
STALL ETAL TAT LATA TT TAAL TTA LL ETAT ALL ALLL 


SEQ 0041 


108: MOV RXCSR,RS ;SHOULD BE SET FOR START OF FRAME 
BIT WRECACT, (R35) ;BR IF SET 
BNE 11$ sFAILED TO SET 
HLT 14 
11$: SCOPE 
preeerrerrerrererrerrrreres TEST 2 eeeeeeereneerererreerereres 
s*TEST TO PROVE THE INTERACTION OF RECEIVER ENABLE 
s*WITH RECEIVER ACTIVE AND RECEIVE 
>*START OF MESSAGE IN SECONDARY MODE. 
piterererrererrerererteererertreeeneeeeeeeeeKeeeeerereKeerEeeeet 
sitereeerenres 
: * 
3 TEST € 
Sr eeeereereees 
iteeeneetereeeteeeeeteett eee ere e eee eKeeeereereneterereeeeereeee ees 
TST2: MOV #2,a#TSTNO 
MOV #1TS13,NEXT 
BIS WMRESET.@TXCSR ;RESET THE DEVICE 
JSR PC,SMALL ;WAIT FOR RESET TO FINISH 
MOV RXCSR,RS ;GET THE RECEIVER CONTROL REGISTER 
BIS #CRCEN, @PARCSR ;TURN OFF CRC 
BIS #RCVEN, (R3) ; TURN ON THE RECEIVER 
BIS #PRISEC @PARCSR sENTER SECONDARY MODE 
BIS #MMODE ,aTXCSR sENTER M/MODE 
- R1,RFLG ;PUSH OUT A FLAG 
BIT WRECACT, (R35) sRXACT SHOULD BE CLEAR WHEN READING FLAG CHAR. 
BEQ 3% ;BR IF OFF 
CLR R5 :SET EXPECTED 
MOV (R3),R4 ;SET FOUND 
HLT 3 :B1T WAS SET AND SHOULD BE CLEARED 
;WE ARE IN SECONDARY MODE 
3$: BIT A#RXDONE ,(R3) ;SHOULD BE CLEAR 
BEQ 4$ :BR IF CLEAR 
HLT 3 :DONE IS SET = SHOULD NOT BE BECAUSE 
7WE ARE IN SECONDARY MODE AND HAVE NOT PUSHED DATA 
4$: CLR DATA ;CLEAR DATA CHAR 
MOV #9. ,SHIFTS ;LOAD THE # OF BITS TO PUSH 
JSR R1,RPOKE ;PUSH DATA TO RECEIVER 
BIT MRECACT,(R3) :RXACT SHOULD BE SFT 
BNE 5$ ;BR IF SET 
MOV MRECACT,RS :SET EXPECTED 
MOV (R3),R4 ;SET FOUND 
HLT 3 s ACTIVE FAILED TO SET 
5$: BIT #RXDONE , (R3) >RXDONE SHOULD BE CLEAR 
BEQ 6$ ;BR IF CLEAR = THE CHAR WAS 
; THE SECONDARY ADRS 
MOV #@RXDONE ,RS ;SET EXPECTED 
MOV (R3),R4 ;SET FOUND 
J 
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Pil 


010022 
010024 
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104003 
032777 


104003 


032777 


104032 


013703 
032713 
001001 
104014 
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000400 


000252 


000200 
000200 


000400 


000252 
000010 
007020 
000002 
000200 


000200 


000400 


001404 
004000 


000003 


001000 
901256 


171354 


001324 
001326 


171300 


001324 
001326 


171224 


dD 4 


+C 


7 PAGE 43 SEQ 0042 
TEST OF REC ENABLE,RXACT,AND RSOM IN SECONDARY MODE 
HLT 3 sDONE WAS SET AND SHOULDN'T BE - THE FIRST 
;DATA WAS SECONDARY ADRS, NOT DATA TO THE BUFFER 
6$: BIT #RSOM,ARXDBUF sCHECK START OF MSG 
BEQ 7$ :BR IF CLEAR 
HLT 20 sSTART OF MSG SHOULD BE CLEAR 
7$: MOvV8 #252,DATA :LOAD DATA CHAR 
MOV #8. ,SHIFTS ;LOAD CLOCK COUNT 
JSR R1,RPOKE ;PUSH OUT DATA 
PKCLK om ;POKE ANOTHER FULL CLOCK 
BIT @RXDONE , .R3) 3 TEST DONE 
BNE 12% “BR IF SET 
MOV #RXDONE ,R5 ;SET EXPECTED 
MOV (R3),R4 >SET FOUND 
HLT 3 ‘DONE FAILED TO SET AFTER PUSHING 
sOUT A CHAR IN SEC. MODE 
AAA ALARA LER 
12% BIT #RSOM,ARXDBUF ;RSOM SHOULD BE SET 
BNE 14% “BR IF SET 
HLT 21 ;RSOM CLEAR 
14$: MOVB #252,DATA sLOAD DATA CHAR 


MOV #8. ,SHIFTS = LOAD CLOCK COUNT 
JSR R1,RPOKE ;PUSH OUT DATA 
PKCLK of sPOKE ANOTHER FULL CLOCK 
BIT #RYDONE , (R3) s TEST DONE 
BNE 15$ ;BR IF SET 
MOV #RXDONE ,R5 sSET EXPECTED 
MOV (R3),R4 :SET FOUND 
HLT 3 ;DONE FAILED TO SET 
15$: BIT #RSOM,ARXDBUF >RSOM SHOULD BE CLEAR 
BEQ 10% 7 IF CLEAR 


HLT 32 AILED TO CLEAR 
LITA VAL ATTA TTA TIEN A ULLUUTA TATED TELA TULL EDEL LLL LLL ATA LAU LTA LLL TAU 
108: MOV RXCSR,R3 ;SHOULD BE SET FOR START OF FRAME 


BIT WRECACT, (R3) BR IF SET 
BNE 11% FAILED TO SET 
HLT 14 

11$: SCOPE 


seeererereererereeeeererere TEST 3 seeeeereerereetereerererene 
>*TEST TO PROVE THE INTERACTION OF REOM 
;*W1TH DONE IN PRIMARY MODE 


pieteertereereresererrreereternereneneeenteeenenesetereeeterenene 
 :e&ereenrrrrret 
® 


3; Test 5 
Sreeeneeeeeens 
Zs reeeereeeererereeeeeeeeeeeeeeeeeete teeter eee eeeneees 
TST3: MOV #3, a#TSTNO 
MOV MTST4,NEXT 
BIS MMRESET,@TXCSR ;RESET THE DEVICE 
JSR PC, SMALL sWAIT FOR RESET TO FINISH 
BIS MRCVEN,QORXCSR ;TURN ON RECEIVER 
BIS MCRCEN,@PARCSR ;TURN OFF CRC 
CLR TEMP] 7B1T COUNTER 


CZDPCC 


CZDPCD. 
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10260 


010426 


010430 
010434 
010436 
010444 
010452 
010454 
010456 
010464 
010466 


010470 


010472 
010500 
630506 
010514 
010520 


104002 
004137 


001001 
104002 


104400 
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014000 
007060 
000125 
000010 
007020 
002000 
000002 
000200 


171050 


000006 


002000 
000004 
171002 
001000 


000200 


007060 


170742 
001000 


000200 


000004 


000020 


171132 
001324 
001326 
171076 
171056 


171046 


001236 
171020 
001240 
170774 


001246 


001240 
170734 


001240 


001226 
001216 
170676 


170656 


—E 4 


EST OF REOM AND DONE IN PRIMARY MODE 


MOV 


BNE 


5$: 
64%: 


1$: 


10$: 


118: 


BIS MMMODE ,@TXCSR ;ENTER MAINT MODE 


JSR R1,RFLG zPUSH OUT A FLAG 
1 ONE FLAG 
dg DATA :CLEAR OUT CHAR 

#8. SHIFTS ;LOAD THE # OF CLOCKS 
ase R1 “SeOxe ;PUSH OUT THE DATA 
BIC #BiTw, aTxXCcsR CLEAR THE DATA WINDOW 
PKCLK ait PUSH OUT THE BIT 
BIT #RXDONE ,ORXCSR CHECK FOR DONE 
5$ BR IF SET 
HLT ;DONE BIT ERROR 
TS1B @RXDBUF sREAD THE BUFFER 
BIS @BITW,aTXCSR sPUT A 1 IN THE WINDOW 
PKCLK = 2 ; PUSH IT OUT 
INC TEMP] > INC THE # TO DO 
CMP #6, TEMP] ; CHECK FOR FINISH 
BNE 64$ ;BR IF MORE TO GO 
BIC #BITW,aTXCSR sCLEAR THE WINDOW 
PKCLK, 4 ;PUSH OUT 2 BINTS 
MOV ARXCSR,TEMP2 ;GET THE CSR 
BIT #REOM, ARXDBUF 3; TEST FOR END OF MSG 
BNE 1$ “BR IF SET 
HLT 1 BIT FAILED TO SET 
BIT #RXDONE ,TEMP2 ; TEST DONE 
BNE 10% ;BR IF SET 
HLT 2 ;DONE FAILED TO SET 

SELIEIITTLTATIT LLL L LT LEILA LTA TATA 8 +( 

‘’ RFLG OUTPUT A FLAG CHAR 
MOV ORXCSR,TEMP2 :GET CSR 
BIT #REOM, ARXDBUF ;REOM SHOULD BF CLEAR 
BEQ 11$ sBR IF CLEAR 
HLT 30 ;REOM FAILED TO CLEAR 
BIT @RXDONE , TEMP2 ;RXDGNE SHOULD BE SET ‘ 
BNE 4% ;BR IF SET 


FAILED TO SET 


HLT 2 
SALITITTTTTATTTA ATTA ATLL LLL ALAA AL AL 


4$: 


TEST 4 


SCOPE ; SCOPE THIS TEST 


ptrererererereeerererererer TEST G trererneereterereeeerenernse 
*TEST TO PROVE THE INTERACTION OF REOM 

:*W1TH DONE IN PRIMARY MODE 

:*USING A COMMON ZERO BIT IN FLAGS. 


s -eeeeeresereresereererereseresaeneeeeeenenaeterreseseraeoeseeetes 


:@eerererereres 


pr: eereeserececerereererresesereeserereesesenetenereneteteseneseteeseree 


1S14: 


MOV #4,a#TSTNO 

MOV #1515 NEXT 

BIS MMRESET,@TXCSR ;RESET THE DEVICE 

JSR PC, SMALL sWAIT FOR RESET TO FINISH 
BIS MRCOVEN, ORXCSR > TURN ON RECEIVER 


SEQ 0043 


— 


CZDPCD.P11 O8-FEB-79 13:15 SPECIAL FLAG SEQUENCE TEST 


2076 : ' 


F 4 
CZDPCC MACY11 30A(1052) oO: “FEB-79 09:35 PAGE 45 SEQ 0044 

2019 010526 052777 001000 170654 81S WCRCEN,@PARCSR ;TURN OFF CRC 

2020 010534 005037 001236 CLR TEMP 1 :BI1T COUNTER 

2021 0105460 052777 014600 170644 BIS #MMODE ,ATXCSR sENTER MAINT MODE 

2022 010546 004137 007060 JSR R1,RFLG ;PUSH OUT A FLAG 

2023 010552 000001 1 ;ONE FLAG 

20246 010554 004137 007152 ie R1,SFLG ;PUSH OUT SPECIAL FLAGS 

2025 010560 000004 sTHE # TO DO 

2026 010562 012737 000125 001324 Mov 1125, DATA ;CLEAR OUT CHAR 

2027 010570 012737 000010 001326 MOV #8. ,SHIFTS ;LOAD THE # OF CLOCKS 

2028 010576 004137 007020 JSR R1 * ABOKE sPUSH OUT THE DATA 

2029 010602 042777 002000 170602 BIC #BiTw,alxCSR ;CLEAR THE DATA WINDOW 

2030 010610 104412 000002 PUCLa gd PUSH OUT THE BIT 

2031 010614 032777 000200 170562 811 ARXDONE ,ARXCSR ;CHECK FOR DONE 

2032 010622 001001 BNE 5$ BR IF SET 

2033 010624 104000 HLT :DONE BIT ERROR 

2034 010626 117737 170554 006054 5$: MOVB @RXDBUF ,TEMP 3GET DATA 

2035 010634 -.2737 000125 006054 CMPB #125,TEMP sCHECK IT 

2036 010642 001401 BEQ 64% ;BR IF A MATCH 

2037 010644 104010 HLT 10 ;DATA COMPARE ERROR 

2038 010646 052777 002000 170536 64$: BIS #BITW,aTXCSR ;PUT A 1 IN THE WINDOW 

2039 010654 104412 000002 PKCLK mt ;PUSH IT OUT 

2040 010660 005237 001236 INC TEMP] ; INC THE # TO DO 

2041 010664 022737 000006 001236 CMP #6, TEMP] sCHECK FOR FINISH 

2042 010672 001365 BNE 64% 7BR IF MORE TO GO 

20463 010674 042777 002000 170510 BIC #BITW,aTXCSR :CLEAR THE WINDOW 

2044 010702 104412 000004 PKCLK, 4 ;PUSH OUT 2 BINTS 

2045 010706 017737 170472 001240 MOV ARXCSR,TEMP2 ;GET THE CSR 

2046 010714 032777 001000 170464 BIT #REOM,ARXDBUF :TEST FOR END OF MSG | 

2047 010722 001001 BNE 1$ 7BR IF SET 

2048 010724 104001 HLT 1 ;B1T FAILED TO SET 

2049 010726 032737 009200 001240 18: BIT WRXDONE,TEMP2 ;TEST DONE 

2050 010734 001001 BNE 10% ;BR IF SET 

2051 010736 104002 HLT 2 ;DONE FAILED TO SET 

2052 SPIIITATTTA AAA AAA TAA A AAA AA AAA A TAA AA AAA ATA AAA AAA AAA AAA ATA AAA AAA AAA AAT +( 

2053 010740 004137 007060 108: JSR R1,RFLG sOUTPUT A FLAG CHAR 

2054 010744 000001 1 | 

2058 010740 017737 170432 001240 MOV @RXCSR,TEMPZ2 :GET CSR | 

2056 010754 032777 001000 170424 BIT #REOM,ARXDBUF ;REOM SHOULD BE CLEAR 

2057 010762 001401 BEQ 11$ :BR IF CLEAR 

20658 010764 104030 HLT 30 ;REOM FAILED TO CLEAR 

2059 010766 032737 000200 001240 118: BIT #RXDONE , TEMP2 ;RXDONE SHOULD BE SET 

2060 010774 001001 BNE 4$ BR IF SET 

2061 010776 104002 HLT 2 sFAILED TO SET 

2062 A 

ee 011000 104400 4$: SCOPE ;SCOPE THIS TEST 

64 

2065 pteerrerererererereeereeeee TEST 5 weneeeeeeeeerereeeeeeeneees 

2066 :*TEST TO PROVE THE INTERACTION OF REOM 

2067 p*WwlTH DONE IN SECONDARY MODE. TEST FOR REOM 

2068 7*AT THE WRONG ADDRESS, THEN AT THE CORRECT 

2069 s*SECONDARY ADDRESS. 

20706 pie eeerereereeteeetee tere tetera eee eee e Tee Keer eee eeeenees 

2071 piteerererenne | 

2072 ; . 

2075 s TEST § | 
| 


G 4 
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CZDPCD.P11 OB-FEB-79 13:15 TEST OF REOM AND DONE IN SECONDARY MODE 

2075 piterrenereree 

2076 , teeter erererereerererereteeeeeretereeereteeneeereneeteeeeteeeeeteees 

2077 011002 012737 000005 001226 1815: Mov #5, a#TSTNO 

2078 011010 012737 011410 001216 MOV #TST6O,NEXT 

2079 011016 052777 000400 170366 BIS MMRESET,@IXCSR ;RESET-THE DEVICE 

2080 011024 004737 005044 JSR PC,SMALL sWAIT FOR RESET TO FINISH 

2081 011030 052777 000020 170346 BIS MRCOVEN,A@RXCSR ; TURN ON RECEIVER 

2082 011036 052777 001009 170344 BIS WCRCEN,@PARCSR ;TURN OFF CRC 

2083 011044 005037 001236 CLR TEMP 1 ;B1T COUNTER 

2084 011050 052777 010000 170332 BIS MPRISEC,@PARCSR ;ENTER SECONDARY MODE 

2085 011056 052777 014000 170326 BIS MMMODE,AaTXCSR ;ENTER MAINT MODE 

2086 011064 004137 007060 JSR R1,RFLG ;PUSH OUT A FLAG 

2087 011070 000001 1 ;ONE FLAG 

2088 011072 012737 000001 001324 Moy #1,DATA sLOAD A CHAR 

2089 011100 012737 000010 001326 MOV #8. , SHIFTS ;LOAD THE # OF CLOCKS 

2090 011106 004137 007020 JSR R1,RPOKE sPUSH OUT THE DATA 

2091 011112 042777 002000 170272 BIC #BiTw,aTXCSR ;CLEAR THE DATA WINDOW 

2092 011120 104412 000002 PKCLK -e sPUSH OUT THE BIT 

2093 011124 032777 000200 170252 BIT #RXDONE,@RY“SR ;CHECK FOR DONE 

2096 011132 001401 BEG 5$ ;BR 1° CLEAR 

2095 011134 104000 HLT ;DONE BIT ERROR 

2096 011136 105777 170244 $$: TSTB aR XKDBUF ;READ THE BUFFER 

2097 011142 052777 002000 170242 648: BIS #Bl TW, aTXCSR ;PUT A 1 IN THE WINDOW 

2098 011150 104412 000002 PKCLK of ;PUSH IT OUT 

2099 011154 005237 001236 INC TEMP 1 >INC THE # TO DO 

2100 011160 022737 000006 001236 CMP #6, TEMP] sCHECK FOR FINISH 

2101 011166 001365 BNE 64% ;BR IF MORE TO GO 

2102 011170 042777 002000 170214 BIC #BITW,a@TXCSR ;CLEAR THE WINDOW 

2103 011176 104412 000004 PKCLK, 4 ;PUSH OUT 2 BINTS 

2104 011202 032777 001000 170176 BIT #REOM, IRXDBUF s TEST REC END OF MSG 

2105 011210 001401 BEQ 2% ;BR IF NOT SET 

2106 011212 104004 HLT 4 3811 1S SET AND SHOULDN'T 

2107 ;BE - THIS IS SECONDARY MODE 

2108 011214 004137 007060 2$: JSR R1,RFLG sOUTPUT A FLAG 

2109 011220 0060001 1 

2110 011222 005037 001324 CLR DATA sCLEAR DATA 

2111 011226 012737 000010 001326 MOV #8. SHIFTS s;LOAD THE # OF CLOCKS 

2112 011234 004137 007020 JSR R1,RPOKE s;PUSHOUT SEC. ADRS 

21135 011240 012737 000252 001324 MOV #252,DATA ;LOAD DATA 

2114 011246 012737 000010 001326 MOV #8. , SHIFTS ;LOAD # OF CLOCKS 

2115 011254 004137 007020 JSR R1,RPOKE ;PUSHOUT DATA 

2116 011260 042777 002000 170124 BIC #BITW,aTXCSR sCLEAR OUT DATA WINDOW 

2117 011266 104412 000002 PKCLK, 2 ;PUSH OUT A BIT 

2118 011272 032777 000200 170104 BIT #RXDONE ,ARXCSR ;CHECK DONE 

2119 011300 001001 BNE 6$ ;BR IF SET 

2120 011302 104002 HLT 2 :DONE FAILED TO SET 

2121 011304 005037 001236 6$: CLR TEMP] sCLEAR TO KEEP TRACK OF THE BITS 

2122 011310 105777 170072 TSTB aRXDBUF sREAD THE BUFFER 

2123 011314 052777 002000 170070 65$: BIS #BITW,aTXCSR ;SET THE WINDOW BIT 

2126 011322 104412 000002 PKCLK, 2 ;PUSH IT OUT 

2125 011326 005237 001236 INC TEMP 1 sCHECK TO SEE IF 

2126 011332 022737 000006 001236 CMP #6, TEMP 36 ARE DONE YET 

2127 0113540 001365 BNE 65$ :BR IF NO 

2128 011342 42777 002000 170042 BIC #BITW,dTXCSR sCLEAR THE WINDOW 

2129 0113550 104412 000004 PKCLK, 4 sPUSH 2 BITS 

2130 0113546 017737 170024 001240 MOV ORXCSR,TEMP2 sREAD THe CSR 





Na sls sl > 


:*TEST FOR ABORT AT THE WRONG SECGNDARY ADDRESS, THEN TEST 


H 4 
CZ7DPCC = MACY11 30A(1052) —— 79 09:33 PAGE 47 SEQ 0046 | 
CZDPCD.P11 O8-FEB-79 13:1 TEST OF REOM AND DONE IN SECONDARY MODE 
2131 011362 032777 001000 170016 BIT #REOM,ARXDBUF 7; TEST END OF MSG 
2132 011370 001003 BNE 3$ sBR IF SET 
2133 011372 104001 HLT 1 ;EOM FAILED TO SET iN SEC. MODE 
2134 0113574 032737 000200 001240 3$: BIT MRXDONE,TEMP2 ; TEST DONE 
2135 011402 001001 BNE 4$ ;BR IF SET 
2136 011406 104002 HUI 2 :BIT FAILED TO SET 
2138 011406 104400 4$: SCOPE :SCOPE THIS TES! 
2140 sterereerrereereeeerereeeee TEST & teererrerrerrerrrrerererere 
2141 :*TEST TO PROVE THE INTERACTION OF ABORT 
Sick ;*WITH A DONE AND RX ERROR IN PRIMARY MODE 
4 
2144 Piteeeeeeerererereererreteeteteeeeeeteeeeeteeeerentereteeeeeeene 
2145 pitttwerenrens 
2146 : d 
2147 ; TEST 6 
2148 ; * 
2149 siteerererenes 
2150 pitseeneererrerrerteeeetee ree tee terene een ReeeeReenenNtene teeter eeee 
2151 011410 012737 000006 001226 TST6: Mov #6,a8TSTNO 
2152 011416 012737 011622 001216 MOV @TST7,NEXT 
2153 011424 052777 000400 167760 BIS MMRESET,@TXCSR [RESET THE DEVICE 
2154 011432 004737 005044 JSR PC, SMALL «WAIT FOR RESET TO FINISH 
2155 011436 052777 001000 167744 BIS MCRCEN,@PARCSR ;TURN OFF CRC 
2156 011444 052777 000020 167732 BIS MRCVEN,ARXCSR ;TURN ON RECEIVER 
2157 011452 052777 014000 167732 BIS WMMODE ,aTXCSR ;ENTER MAINT MODE 
2158 011460 004137 007060 JSR R1,RFLG ;PUSH OUT A FLAG | 
2159 011464 000001 1 ;ONE FLAG 
2160 011466 005037 001324 CLR DATA ;CLEAR DATA 
2161 011472 012737 000010 001326 MOV #8. , SHIFTS ;LOAD CLOCKS 
2162 011500 004137 007020 JSR R1,RPOKE PUSH OUT DATA CHAR 
2163 011504 052777 002000 167700 BIS #BITW,@TXCSR ;SET THE WINDOW | 
2164 011512 104412 000002 PKCLK, : PUSH OUT A BIT 
2165 011516 105777 167664 TSTB OR XDBUF ;READ A CHAR | 
2166 011522 112737 090177 001324 MOVB #177,DATA ;LOAD A SECOND CHAR 
2167 011530 012737 000010 001326 MOV ' #8. SHIFTS ;LOAD CLOCKS 
2168 011536 004137 007020 JSR R1,RPOKE ;PUSH OUT THE DATA 
2169 011542 017737 167636 001236 MOV ORXCSR, TEMP READ THE C 
2170 011550 017700 167632 MOV ARXDBUF ,RO ;SAVE THE BUFFER 
2171 011554 032700 002000 BIT #RABORT ,RO ; TEST ABORT BIT 
2172 011560 001001 BNE 1$ :BR IF SET 
2173 011562 104005 HLT 5 ;ABORT BIT FAILED TO SET 
21746 011564 032737 004000 001236 18% BIT MRECACT, TEMP 1 ; TEST REC ACT 
2175 011572 001401 BEQ 2$ :BR IF CLEAR 
2176 011574 104006 HLT 6 REC ACT. FAILED TO CLEAR 
2177 011576 032737 000200 001236 2% BIT MRXDONE,TEMP1 ;TEST DONE 
2178 011604 001001 BNE 3$ :BR IF SET 
2179 011606 104002 HLT 2 ;DONE FAILED TO SET - 
2180 011610 032700 100000 3$ BIT #RXDERR,RO ; TEST ERROR BIT ‘ 
2181 011614 001001 BNE 12$ BR IF SET 
2182 011616 104007 HLT 7 sERROR BIT FAILED TO SET AFTER ABORT 
218% 011620 104400 12$: SCOPE ;SCOPE THIS TEST 
2184 ptererterereerererererereee TEST 7 eeeeenerereenerseseserneere 
2185 ;*TEST TO PROVE THE INTERACTION OF ABORT IN SECONDARY MODE | 





1 4 
CZDPCC MACY11 30A(1052) ys FEB-79 09: 7 PAGE 48 SEQ 0047 | 
CZDPCD.P11 O8-FEB-79 13:1 TEST OF ABORT,DONE,AND RXERR IN SEC MODE | 
2187 7*AT THE CORRECT SECONDARY ADDRESS e 
2188 pie eeeerererererererrereereeeeeeretenetenerentererereeteeeCereTe ° 
2189 pi eeeenrerreee 
2190 y : * 
2191 t VEST 7 
2192 : ‘ 
2193 piterereeerees 
2194 PIeeeeeeneerererertereeeereeeereTee eee eeeeeeeteeeTeeereRereenereeeTere 
2195 011622 012737 000007 001226 IST7: MOV #7,a#TSTNO 
2396 011630 012737 012160 001216 MOV #TSTIO,NEXT 
2197 011636 052777 000400 167546 BIS WMRESET,@TXCSR ;RESET THE DEVICE 
2198 011644 004737 005044 JSR PC,SMALL sWAIT FOR RESET TC FINISH 
2199 011650 052777 001000 167532 BIS MCRCEN,@PARCSR ;TURN OFF CRC 
2200 011656 052777 000020 167520 BIS MRCVEN,ARXCSR ;TURN ON RECEIVER 
2201 011664 052777 010000 167516 BIS MPRISEC,@PARCSR ; ENTER SECONDARY MODE 
2202 011672 052777 014000 167512 BIS #MMODE ,ATXCSR sENTER MAINT MODE 
2203 011700 004137 007060 JSR R1,RFLG ;PUSH OUT A FLAG 
2206 011704 000001 1 ;ONE FLAG 
2205 011706 012737 000001 001324 Mov #1,DATA ;LOAD WRONG ADRS 
2206 011714 012737 000010 001326 MOV #8. SHIFTS ;LOAD CLOCKS 
2207 011722 004137 007020 JSR R1,RPOKE ;PUSH OUT DATA CHAR 
2208 011726 052777 002000 167456 BIS #BITW,aTXCSR :SET THE WINDOW 
2209 011734 104412 000002 PKCLK, 2 ;PUSH OUT A BIT 
2210 011740 105777 167442 TSTB aRXDBUF ;READ A CHAR 
2211 011744 112737 000177 001324 MOVB #177,DATA ;LOAD A SECOND CHAR 
2212 011752 012737 000010 001326 MOV #8. , SHIFTS ;LOAD CLOCKS 
2213 011760 004137 007020 JSR R1,RPOKE ;PUSH OUT THE DATA 
22146 011764 032777 002000 167414 BIT #RABORT ,A@RXDBUF ; TEST FOR ABORT 
2215 011772 001401 BEQ 5$ ;BR IF NOT SET 
2216 011774 104011 HLT 11 ;ABORT IS SET AND SHOULDN'T | 
2217 7BE - THIS IS A SECONDARY STATION | 
2218 011776 004137 007060 5$: JSR R1,RFLG >PUSH OUT A FLAG 
2219 012002 000003 1 ONE FLAG 
2220 012004 005037 001324 CLR DATA ;LOAD ADRS 
2221 012010 012737 000010 001326 MOV #8.,SHIFTS ;LOAD CLOCKS 
2222 012016 004137 007020 JSR R1,RPOKE :PUSH OUT THE ADRS 
222% 012022 012737 000252 001324 MOV #252,DATA ;LOAD A CHAR 
22246 012030 012737 000010 001326 MOV #8. , SHIFTS sLOAD CLOCKS 
2225 012036 004137 007020 JSR R1,RPOKE 7PUSH OUT THE CHAR 
2226 012042 052777 002000 167342 BIS #BITW,aTXCSR 7SET THE WINDOW 
2227 012050 104412 000002 POLL, ;PUSH OUT A BIT 
2228 012054 105777 167326 TSTB aR XDBUF ;READ THE CHAR 
2229 012060 112737 000177 101324 MOVB #177,DATA ;LOAD THE ABORT 
2230 012066 012737 000010 001326 MOV #8. , SHIFTS ;LOAD CLOCKS 
2231 012074 004137 007020 JSR R1,RPOKE ;PUSH OUT THE ABORT 
2232 012100 017737 167300 001240 MOV ORXCSR,TEMP2 ;READ THE CSR 
2233 012106 017700 167274 MOV ARXDBUF ,RO ;SAVE THE BUFFER 
2234 012112 032700 002000 BIT #RABORT ,RO :TEST THE ABORT BIT 
2235 012116 001001 BNE 6$ ;BR IF SET 
2236 012120 104005 HLT 5 :BIT IS CLEAR = SHOULD BE SET 
2237 012122 032737 004000 0012'0 6$: BIT MRECACT,TEMP2 = ; TEST wth 
2238 012130 001401 BEQ 7$ , :BR IF CLEA 
2239 012132 104006 HLT 6 :BII FAILED” TO CLEAR AFTER ABORT ; 
2240 012134 0352737 000200 001.40 7$: BIT @RXDONE , TEMP2 : TEST DONE " 
2241 012142 001001 BNE 10% ;BR IF SET 
2242 012146 104002 HiT :DONE FAILED TO SEéT 
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032700 
001001 
104007 


104400 


001401 
104032 


100000 


000010 


007060 
001324 


002090 


000020 


002000 


004000 


000200 
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001226 
001216 
167210 
167174 


167162 
167162 


001326 
167130 
001324 


001326 
001236 


167042 
001236 


001236 


001236 


J 4 
TEST OF ABORT,DONE,AND RXERR IN SEC MODE 


SEQ 0048 


10$: BIT #RXDERR,RO ; TEST FOR ERROR 

BNE 12% :BR IF SET 

HLT 7 ERROR WASN'T SET AFTER ABORT 
12%: SCOPE ;SCOPE THIS TEST 


sderecerreerrerrireereeeete TEST 10 eeeeenereererenrerereerrers 


#TEST EFFECT OF REC ENABLE ON ABORT 


:*RXACTIVE, RXDONE, RXERROR. 
, teeter ererererererereteteetereeeeeeeeeeeeeeteneneeeeeeteterenese 
, : @eeertereere 
: TEST 10 
é * 
; ite eeeeeereee 
, et eeeneeeeterereeteeeeeteene eee eee Keehn eeeneeteee 
TS110: MOV #10, a#TSTNO 
MOV #TST11,NEXT 
BIS WMRESET,@TXCSR ;RESET THE DEVICE 
JSR PC, SMALL sWAIT FOR RESET TO FINISH 
BIS WCRCEN,@PARCSR ;TURN OFF CRC 
BIS WRCVEN,@RXCSR  ;TURN ON RECEIVER 
BIS #MMODE,aTXCSR  ;ENTER MAINT MODE 
JSR R1,RFLG :PUSH OUT A FLAG 
1 ZONE FLAG 
CLR DATA sCLEAR DATA 
MOV #8. SHIFTS :LOAD CLOCKS | 
JSR R1,RPOKE :PUSH OUT DATA CHAR | 
BIS #BITW,aTXCSR :SET THE WINDOW 
PKCLK, ;PUSH OUT A BIT 
TSTB aRXDBUF ;READ A CHAR 
MOVB #177,DATA :LOAD A SECOND CHAR | 
MOV #8., SHIFTS :LOAD CLOCKS 
JSR R1,RPOKE :PUSH OUT THE DATA 
MOV ARXCSR, TEMP 1 :READ THE CSR 
MOV ARXDBUF ,RO :SAVE THE BUFFER 
BIT #RABORT,RO :TEST ABORT BIT 
BNE 208 :BR IF SET 
HLT :ABORT BIT FAILED TO SET 
20$: BIC WRCVEN,@RXCSR ;CLEAR REC ENABLE 
MOV ARXCSR, TEMP 1 :SAVE STATUS 
MOV ARXDBUF ,RO :SAVE REC BUFFER 
BIT #RABORT,RO :ABORT CLEAR? 
BEQ 1$ :1F YES.BR 
HLT 30 :ABORT FAILED TO CLEAR 
1$ BIT MRECACT, TEMP] ;TEST REC ACT 
BEQ 2$ :BR IF CLEAR 
HLT 6 ;REC ACT. FAILED TO CLEAR 
2$: BIT WRXDONE,TEMP1  :TEST DONE 
BEQ $ :BR IF CLEAR 
HLT 31 :DONE FAILED TO CLEAR 
3$: BIT #RXDERR,RO :TEST ERROR BIT 
BEQ 12$ :BR IF CLEAR 
HLT 32 sERROR BIT FAILED TO CLEAR AFTER RCVEN 


CLEARED. 


MACYI1 wet 


CZDPCC 

CZDPCD.P11 
2299 012420 
2300 
2301 
2302 
2303 
2304 
2305 
2306 
2307 
2308 
2309 
2310 
2311 012422 
2312 012430 
2313 012436 
2314 012444 
2315 012450 
2316 012456 
2317 012464 
2318 012472 
2319 012476 
2320 012500 
2321 012504 
2322 012512 
2323 012516 
2324 012524 
2325 012530 
2326 012534 
2327 012542 
2328 012550 
2329 012554 
2330 012562 
2331 012566 
2332 012572 
2333 012574 
2334 012576 
2335 012602 
23536 012610 
2337 012614 
2338 012622 
2339 012624 
2340 012626 
2341 012632 
2342 012634 
23435 012636 
2344 012642 
2345 0126464 
2346 
2347 012646 
2348 
2349 
2350 
2351 
2352 
2553 
2554 


08-FEB-79 
104400 


104032 
104400 


K 4 


13045 FEB-79 09:33 PAGE 50 SEQ 0049 


000011 


007060 


001324 
000010 


002000 


166604 
166576 
166572 
000200 


002000 


100000 


001226 
001216 
166746 
166732 


166720 
166720 


001326 
166666 
001324 
001326 
001236 


001236 
001236 


TEST OF RCVEN, ABORT, RXACTIVE, RXDONE, RXERROR 
12$: SCOPE 


peererenrererreverrereereee TEST 1] tetererrerrere eeereererere 
s*TEST THE EFFECTS OF READING THE RXDBUF s3eee 
;*ON THE RXDONE, RXERROR, AND ABORT 


, i: eeretereereerererereererereteteneteneteteeeeeeeeeeeeeneeeeeeeee 

:etereeeeetet 
* 

; Ves? V1 
& 
Sie arp tie 
-:;e@ereeereeeereerreterereenteteeeetere rete eaeeeneeneeweeeneeeweneeeeneese 
1S111: MOV #11,a#TSTNO 

MOV #TST12,NEXT 

BIS MMRESET,@TXCSR ;RESET THE DEVICE 

JSR PC, SMALL ;WAIT FOR RESET TO FINISH 

BIS MCRCEN,@PARCSR ; TURN OFF CRE 

BIS MRCVEN,ARXCSR ; TURN ON RECEIVER 

BIS MMMODE ,@TXCSR ;ENTER MAINT MODE 


JSR R1,RFLG PUSH OUT A FLAG 
1 ONE FLAG 

CLR DATA ;CLEAR DATA 

MOV #8. ,SHIFTS ;LOAD CLOCKS 


JSR R1,RPOKE ;PUSH OUT DATA CHAR 
BIS #BITW,aTXCSR fod THE WINDOW 
U 


PKCLK, H OUT A BIT 

TST6 @RXOBUF :READ A CHAR 

MOVB #177,DATA ;LOAD A SECOND CHAR 

MOV #8. SHIFTS ;LOAD CLOCKS 

JSR R1,RPOKE ;PUSH OUT THE DATA 

MOV ARXCSR, TEMP READ THE CSR 

MOV @RXDBUF ,RO SAVE THE BUFFER 

BIT #RABORT ,RO : TEST ABORT BIT 

BNE 20% :BR IF SET 

HLT 5 ;ABORT BIT FAILED TO SET 
20$: TST OR XDBUF READ RXDBUF 

MOV ORXCSR, TEMP 1 SAVE STATUS 

MOV @RXDBUF ,RO :SAVE REC BUFFER 
1$: BIT #RXDONE , TEMP 1 TEST DONE 

BEQ 2$ ;BR IF CLEAR 

HLT 31 ;DONE FAILED TO CLEAR 
2$: BIT #RABORT ,RO ; ABORT CLEAR? 

BEQ 3% c1F YES,BR 

HLT 30 ;ABORT FAILED TO CLEAR 
3$: BIT #RXDERR,RO ; TEST ERROR BIT 

BEQ 12% :BR IF CLEAR 

HLT 32 a. BIT FAILED TO CLEAR AFTER RXDBUF 
12$: SCOPE ;SCOPE THIS TEST 


 eeeereereterenterertettert TEST 12 eeeeeewerereneeeereeeeeerer 
;*DATA OVERRUN TEST IN PRIMARY AODE. TEST TO 
;*PROVE OVERRUN ERROR AND RX ERROR WILL OCCUR 


siteerereresterteererereetereetereneneeeeteeteeeeteteeteneteetes 


, eeenseevetee 
a 


CZDPCC MACY11 30A(1052) 


CZDPCD.P11 
2355 
2356 
2357 
2358 
2359 012650 
2360 012656 
2361 012664 
2362 012672 
2363 012676 
2364 012702 
2365 012710 
2366 012714 
2367 012722 
2368 012726 
2369 012730 
2370 012736 
2371 012744 
2372 012750 
2373 012756 
2374 012764 
2375 012770 
2376 012774 
2377 013000 
2378 013004 
2379 013006 
2380 
2381 013010 
2382 013014 
2383 013016 
2384 
2385 013020 
2386 
2387 
2388 
2389 
2390 
2391 
2592 
2395 
2394 
2395 
2396 
2397 
2398 
2399 
2400 013022 
2401 013030 
2402 013036 
2403 013044 
2404 013050 
2405 013054 
2406 013062 
2407 013066 
2408 013074 
2409 013102 
2410 015106 


08-FEB-79 


104013 
032713 
001001 
104014 


104400 


0 -FEB-79 09:33 PAGE 51 
13:15 DATA OVERRUN TEST IN PRIMARY MODE 


000012 


007060 
000252 


140000 . 


004000 


000013 


007060 


166500 
166470 
001324 
001326 


001324 
001326 


001226 
001216 
166346 


166326 


166314 
166310 


; TEST 12 


-s@rererrrrere 


“‘ 


- ,ererererererereeeererereeeeeeeereeeeeeeeeeeeeteeeeeeeeeeeeeeeteeneeeee 


1S112: MOV 


2$: BIT 


3$: SCOPE 


#12,a#TSTNO 


#TST13,NEXT 
WARESET,@TXCSR ;RESET THE DEVICE 
PC, SMALL ;WAIT FOR RESET TO FINISH 
RXCSR,R3 ;LOAD THE CONTROL REGISTER 
WCRCEN,QPARCSR ;.URN CFF CRC 
#RCVEN, (R35) ; TURN ON THE RECEIVER 
WMMODE ,aTXCSR ENTER MAINTENANCE MODE 
R1,RFLG :PUSH OUT A FLAG 

;ONE FLAG 
#252,DATA ;LCAD CHAR TO BE OUTPUT 
#8. , SHIFTS ;CLOCK SETUP 
R1,RPOKE ;PUSH DATA iNTO RECEIVER 
#70,DATA ;LOAD A SECOND CHARACTER 
#9. ,SHIFTS ;SETUP MOF CLOCKS 
R1,RPOKE ;PUSH THE SECOND CHARACTER INTO RX 
ORXDBUF ,R& ; SAVE BUFFER 


#*C<RXDERR!OVRRUN>,RO ;CLEAR JUNK 
oe RO | i CHECK TO SEE IF BOTH ARE SET 


IF OK 
13 s THEY DIDN'T MATCH 
MRECACT,(R3) sTEST REC. ACT 
3$ :BR IF STILL SET 
14 ;REC. ACTIVE CLEARED AND SHOULD BE SET 


;SCOPE THIS TEST 


pterereererererereeeeeretee TEST [3 eeeereneeereereernererenere 
:*DATA OVERRUN TEST IN SECONDARY MODE. TEST TO PROVE 

;*THAT OVERRUN DOES NOT OCCUR IF THIS STATION IS NOT 
;*SELECTED. THEN SELECT THIS SECONDARY STATION AND 

;*PROVE OVERRUN ERROR ANC RX ERROR WILL OCCUR 


;:eeeeeeeeererereereeeeteeereeeekeeeeeeeeeeeeeeeeeeeeeeneeneeee 


TEST 13 


$113: MOV 
MOV 
BIS 
JSR 
MOV 
BIS 


rereeeeeneeee 


waren 
'MARBABBBASRSSSARASBSAASARR AR RSARRRRRRRRRRR RRR RRR RRR RRR RRR RRR RRR RRR RRR E EE OD 


#13,a#TSTNO 

#TST14,NEXT 

WMRESET,@TXCSR ;RESET THE DEVICE 

PC, SMALL WAIT FOR RESET TO FINISH 
RXCSR,R3 ;LOAD THE CONTROL REGISTER 
#CRCEN, MPARCSR ; TURN OFF CRC 


#RCVEN, (R35) :TURN ON THE RECEIVER 


BIS 
BIS WPRISEC, SPARCSA :ENTER SECONDARY MODE 


BIS 
- 


WMMODE ,aTXCSR ENTER MAINTENANCE MODE 
R1,RFLG :PUSH OUT A FLAG 
;ONE FLAG 


SEQ 0050 


CZDPCC MACYI1 wd 


CZDPCD.P11 
2411 013110 
2412 013116 
2413 013124 
2414 013130 
2415 013136 
2416 
2417 013140 
2418 
2419 
2420 013142 
2421 013146 
2422 013150 
2423 013154 
2424 013162 
2425 013166 
2426 013174 
2427 013202 
2428 013206 
2429 013214 
2430 013222 
2431 013226 
2432 013232 
2433 013236 
2434 013242 
2435 013244 
2436 
2437 013246 
2438 013252 
2439 013254 
2440 013256 
244) 

2442 
2443 
2444 
2445 
2446 
2447 
2448 
2449 
2450 
2451 
2452 015260 
2453 013266 
2454 013274 
2455 013302 
2456 013306 
2457 013312 
2458 013316 
2459 013322 
2460 013330 
26461 013334 
2462 013342 
2465 013350 
2464 013356 
2465 013364 
2466 0133570 


08-FEB-79 
012737 


001401 
104015 


004137 


104013 


032713 
001001 
104005 
104400 


o-—-oCoCoCcoCooCooo°oo 
NNN SNS SN 


qn FEB-79 09:33 PAG 
13:15 


000252 


040000 


007060 
001324 


140000 


004000 


000014 


166020 


001324 
091326 


166250 


001326 


001324 
001326 


001324 
001326 


166060 


166050 
166034 
166034 
166030 


mM 4 


E 52 
DATA OVERRUN TEST IN SECONDARY MODE 


MOV #252,DATA ;LOAD AN eer SEC. STA ADRS 


MOV #25. , SHIFTS ;PUSH OUT 3 CHAR 

JSR R1,RPOKE THRU THE RECEIVER 

BIT WOVRRUN ,ARXDBUF ; TEST FOR OVERRUN 

BEQ 4% :BR IF NOT SET 

HLT 15 ;OVERRUN IS SET AND SHOULDN'T BE 


;THIS IS A SECONDARY STATION WHICH 
;D1D NOT GET ITS ADDRESS 


4%: JSR R1,RFLG PUSH OUT A FLAG 
1 ;ONE FLAG 
CLR DATA GET CORRECT SEC. STATION ADRS 
MOV #8. SHIFTS sMOVE THE MOF CLOCKS TO PUSH 
JSR R1,RPOKE ;PUSH OUT THE SEC. ADRS 
MOV #252,DATA ;PUSH OUT 
MOV #8. , SHIFTS : TWO 
JSR R1,RPOKE sDATA 
MOV #70,DATA ; CHARACTERS 
MOV #9. , SHIFTS :TO FORCE 
JSR R1,RPOKE ;AN OVERRUN ERROR 
MCV @RXDBUF , RO ; SAVE 
BIC #*C<RXDERR ! OVRRUN> ,RO ;CLEAR JUNK 
CMP MRXDERR!OVRRUN,RO ;ARE THE ERROR BITS THERE 
BEG 6$ :BR IF YES 
HLT 13 ERROR BITS MISSING 
6$: BIT WRECACT,(R3) TEST ACTIVE 
BNE 3$ :BR IF SET 
HLT 5 ACTIVE DROPPED OUT 
3$: SCOPE ;SCOPE THIS TEST 
ptererereererereeeseeeeerer TEST 14 reeeneereeeenrererererenset 
s*TEST OF SPECIFIC DATA PATTERNS THRU 
:*THE RECEIVER IN PRIMARY MODE 
piteererterrereetenteeeee eee eRe eRe Ae e Tee NTE 
pitwereererene 
2 * 
; TEST 14 
: a 
siteeeeererene 
pi eweeeeeeeeeeerere terete terete eee eee Ree eee eee eee 
TST14: MOV #14,a#TSTNO 


MOV @TST15, NEXT 
BIS WMRESET,@TXCSR ;RESET THE DEVICE 


JSR PC, SMALL WAIT FOR RESET TO FINISH 
MOV #TBLA,RS3 ;LOAD THE TABLE POINTER 
MOV #TBLA,R4 :D1TT0 

MOV #4 ,R2 ;LOAD THE # OF CHARS 10 DO 
BIS #CRCEN,@PARCSR 


CLR a1 XDBUF ;RESET TXDONE 

BIS #MMODE ,ATXCSR sENTER M/MODE 

BIS #RCVEN,ARXCSR sTURN ON THE RECEIVER 
BIS #SEND,@TXCSR ; TURN ON’ THE TRANSMITTER 

BIS #TSOM,aTXDBUF “START A FLAG 

PKC sSTART A FLAG 

MOV ;LOAD FIRST DATA CHAR 


- 
~ 


ak 
(R3)*,aTXDBUF 


SEQ 0051 


a 


SS 


N 4 


CZDPCC MACY11 30A(1052) + ~FEB-79 09:33 PAGE 53 SEQ 0052 
CZDPCD.P11 O8-FEB-79 13:1 RECEIVER DATA TEST WITHOUT CRC 

2467 013374 005302 DEC R2 ;LOWER THE # TO DO 

2468 013376 104412 000020 PKCLK ,16. ;PUSH OUT 

2469 013402 012377 166006 1$: MOV (R3)* ,aTXDBUF ;LOAD DATA 

2470 013406 005302 DEC R2 ;LOWER THE # TO DO 

2471 013410 104412 000020 PKCLK ,16. ;PUSH OUT DATA 

2472 013414 105777 165764 TS18 aRXCSR ;CHECK FOR RX DONE 

2473 013420 100401 BMI 2% ;BR IF DONE SET 

2474 013422 104000 HLT :RX DONE FAILED TO SET 

2475 013424 017737 165756 001324 2%: MOV @RXDBUF ,DATA 3;GET THE BUFFER 

2476 013432 121437 001324 CMPB (R4) DATA sCHECK IT 

2477 013436 001401 BEQ 3$ ;BR IF OK 

2478 013440 104000 HLT DATA COMPARE EROR 

2479 013442 005724 3$: TST (R4)+ 

2480 013444 005702 TST Re : CHECK FOR FINISH 

2481 013446 001355 BNE 1$ ;BR IF MORE TO GO 

2482 013450 104412 000020 PKCLK 16. ;PUSH OUT LAST CHAR 

2483 013454 105777 165724 TSTB @RXCSR ;CHECK FOR DONE 

2484 013460 100401 BM1 4% ;BR IF DONE SET 

2485 013462 104000 HLT DONE FAILED TO SET 

2486 013464 017737 165716 001324 48: MOV @RXDBUF ,DATA ;GET THE BUFFER 

2487 013472 121437 001324 CMPB (R4),DATA CHECK IT 

2488 013476 001401 BEQ 5$ ;BR iF A MATCH 

2489 013500 104000 HLT :DATA COMPARE ERROR 

2490 013502 5$: 

2491 013502 052777 000400 165702 BIS MMRESET,@TXCSR ;RESET THE DEVICE 

2492 013510 004737 005044 JSR PC, SMALL WAIT FOR RESET TO FINISH 

2493 013514 104400 . SCOPE 

2494 

2495 ;DATA TABLE 

2496 013516 000125 TBLA: WORD 125 

2497 013520 000252 -WORD 252 

2498 013522 000000 -wORD 000 

2499 013524 000377 -WORD 5377 

Seay 013526 000000 -WORD 000 

2 

2502 pteeererererertrererererete TEST 15 eeeeeeeerreerererentererene 

2508 ;*TES1 TO PROVE THAT THE DEVICE WILL 

2504 S*WORK WITH ALL POSSIBLE SECONDARY 

2505 :*STATION ADDRESSES. 

2506 Lr eeeereeereeeeertrereererereeeeeneeeeeerenenenetereeerseeeeeees 

2507 R 

2508 piteeeerereres ‘ 

2509 : * ‘ 

2510 ; TEST 15 

2511 : 

2512 preeerereerees 

2513 pp eeeenerererenenerereterrerereeeeeeeesereeneeeeeereeeeEeResETEETEEsS 

2514 013530 012737 000015 001226 TST15: MOV #15, a#TSTNO 

2515 013536 012737 014024 001216 MOV #TST16,NEX) 

2516 013544 012737 013572 001220 MOV #20$,L0CK ;SwO9 SETUP 

2517 013552 005005 CLR R5 CLEAR SEC ADRS HOLD 

2518 013554 005037 001256 CLR TEMP | CLEAR TEMP STORAGE 

2519 013500 005037 001240 CLR TEMP2 ;01TT0 

2520 Hts 2: 012737 011000 001230 208 MOV @CRCEN!PRISEC, TEMP ;LOAD MODE AND NO CRC 

2521 59 : 

2522 013572 052777 000600 165612 BIS @MRESET @TKCSR ;RESET THE DEVICE 


CZDPCC =MACYI1 30001052) 


CZ2DPCD.P11 
2523 013600 
2524 013604 
2525 013612 
2526 013620 
2527 013626 
2528 013632 
2529 013634 
2530 013642 
2531 013646 
2532 013650 
2533 013656 
2534 013662 
2535 013664 
2536 013672 
2537 013700 
2538 013702 
2539 013710 
2540 013712 
2541 013716 
2542 013720 
2543 013724 
2544 013726 
2545 013730 
2546 013734 
2547 013740 
2548 013742 
2549 013744 
2550 013750 
2551 013752 
2552 013754 
2553 013756 
2554 013764 
2555 013770 
2556 013772 
2557 013774 
2558 014000 
2559 014004 
2560 014012 
2561 014020 
2562 014022 
2563 
2564 
2565 
2566 
2567 
2568 
2569 
2570 
2571 
2572 
2573 
2574 
2575 014024 
2576 014032 
2577 =014040 
2578 014044 


08-F EB-79 


104400 


ote FEB-79 09:33 PAGE 54 
13:15 SECONDARY STATION ADDRESS TEST 


005044 


165560 


000400 
165544 


001240 
165530 


000252 
004000 


004000 
165466 
165460 


165452 
000400 


000252 


000400 
005044 


001236 
001240 
011090 
001236 


C00016 
014542 
014350 
000004 


165576 
165564 
165564 


165552 
165536 
165522 


165514 
165504 


165426 


001236 
165370 


1$: 


118: 


8 5 


PC, SMALL WAIT FOR RESET TO FINISH 

TEMP] ,@PARCSR ;LOAD MODE AND NO CRC AND SEC STATION 
MRCVEN,@RXCSR ;TURN ON RECEIVER 

#SYSTST'SEND, atxCsr ; TURN ON TRANSMITTER AND CLOCK 


@TxcSR WAIT FOR 

2% = DONE 

#1SOM,aTXDBUF ;LOAD —" OF MSG 

aTxcsR sWAIT FOR 

3$ : DONE AGAIN 

TEMP2,a1XDBUF ;LOAD SEC STATION ADRS AND 

aTxXCSR sWAIT FOR 

4% ;DONE AGAIN 

#252, aTXDBUF sNOW LOAD DATA 

MTIMER,@TXDBUF ;CHECK THE TIMER BIT 

64% :BR IF SET 

TIMER, @TXDBUF ;CHECK THE TIMER BIT 

65$ = BR IF CLEAR 

A@RXCSR s TEST FOR 

5$ RX DONE 

ORXCSR ; TEST FOR ERROR 

6$ = BR IF NO ERROR 

14 = ERROR FOUND! 

ARXDBUF ,R4 ;GET THE BUFFER 

#RSOM,R4S ;CHECK FOR START OF MSG 

7% 3BR IF SET 
;START OF MSG FAILED TO SET 

#252,R4 ; CHECK FOR DATA 

10% 3;BR IF A MATCH 

12 sFAILED TO RECEIVE DATA AS A SEC STATION 
7SwO9=1? 

MMRESET,@TXCSR ;RESET THE DEVICE 

PC,SMALL ;WAIT FOR RESET TO FINISH 

R5 3GET NEXT SEC ADRS 

11% 3;BR IF ALL DONE 

R5, TEMP’ ;LOAD THE ADRS FOR PAR CSR 

R5,TEMP2 :DI1TTO FOR TXD BUF 


#CRCEN'PRISEC, TEMP ;LOAD FOR PAR CSR 
TEMP1,@PARCSR ;DO iT 
1$ ;BR TO DO OVER 

;SCOPE THIS TEST 


ptererererereerereeeererere TEST 16 wreeenrereereeerereeererere 
:*TEST OF SPECIFIC CHARACTER DATA PATTERNS 
;*USING BCC CHECK IN PRIMARY MODE. 


pi etereererrineseeerererereteeneaerenetenenteeeeeentewaeneeeneeee 


etre eereree 


TEST 16 


freeeereenreee 


Si teteererrererereeresereresereseteeeneteteneeeneeerereneeeeeeseeeeee 


TST16: 


MOV 
MOV 
MOV 
MOV 


#16,a#TSTNO 

@TSTI7,NEXT 

#TBLB,R4 ;GET THE TABLE POINTER 
#4 RS GET THE # TO DO 


SEQ 0055 


CZDPCC = MACY11 350A(1052) 


CZDPCD.P11 


014050 


O8-FEB-79 1 


104000 
011177 


104000 


005721 
005722 
005724 
005303 
001247 
104400 


a0 FEB-79 09:33 PAGE 55 
13:15 RECEIVER DATA TEST WITH CRC 


#TBLB.RI 
4 oR2 


#CRC.CCITT, XPOLY. 
#-1,CALBCC 
CALBCC, 128 

(R4), 118 
R5,SIMBCC 


350 


165214 


165206 


165154 


165146 
001324 


000020 
165122 


165072 
014540 
014540 


014534 
014540 
014122 


165260 


165246 
165232 
165232 
165226 


165174 


001324 


001324 


001325 
001324 


10$: 


os 
Na 
rw 


2$: 


3$: 


4%: 


5$: 


6$: 


1 


1 

#MRESET ,@TXCSR 
C, SMALL 
#MMODE ,ATXCSR 
ARCVEN,ARXCSR 
WSEND,@TXCSR 
a. 


aTXCSR 
1$ 


Pp 


hl aacccmmaes 
16. 

of * egies 
16. 

@RXCSR 

2$ 

@RXDBUF ,DATA 
(R2),DATA 

3$ 

, 6, 

@RXCSR 

4$ 

ORXDBUF ,DATA 
26. 

ARXCSR 

5$ 


;GET THE POINTER 
;DItTO 


;CLR DATA HOLD 
;LOAD THE POLYNOMIAL FOR CRC 
;PRESET BCC FOR SDLC 
MOVE BCC 
:MOVE DATA 
:GO CALCULATE BCC 
; BASED 


ON THESE 

; PARME TERS 

RESET THE DEVICE 
WAIT FOR RESET TO FINISH 
sENTER MAINT MODE 

; TURN ON THE RECEIVER 
; TURN ON TRANSMITTER 
TURN ON START OF MSG 
PUSH OUT 4 BITS 
CHECK FOR DONE 

7BR IF SET 

;DONE FAILED TO SET 


;LOAD DATA 

;PUSH OUT 8 BITS 

:SET END OF MSG 

;PUSH OUT 8 MORE BITS 

ZCHECK FOR DONE 

:BR IF SET 

;DONE FAILED TO SET 

READ THE BUFFER 

;CHECK THE DATA 

;BR IF A MATCH 

;DATA COMPARE ERROR 

;PUSH OUT 8 MORE BITS 

CHECK FOR DONE 

:BR IF SET 

:DONE FAILED TO SET ON FIRST OCTET OF BCC 
;READ THE BUFFER 

FINISH POKING BITS 

> CHECK FOR DONE 

;BR IF SET 

;DONE FAILED TO SET ON SECOND OCTET OF BCC 


ARXDBUF DATA #1 :GET IT 
CALBCC 


CALBCC,DATA 
6$ 


INVERT SOFTWARE 

; COMPARE 

:BR IF A MATCH 

:BCC COMPARE FAILURE 

USE CRC DEBUGGING ROUTINE TO 
REPAIR CRC.SEE FRONT OF LISTING 
:POP ns 


“DITTO 

;DECREMENT THE # TO DO 
:BR IF MORE TOGO 
:SCOPE THIS TEST 





& 


CZDPCC 


CZDPCD.P 


MACY11 30A(1052) 


fm 


014540 


000252 
9 


120001 
102010 


0 


26-FEB-79 09:33 PAGE 56 


O8-FEB-79 13:15 


001240 
000001 


014536 
014534 


014536 
001242 
014536 
001242 
014536 
014534 001242 
001242 
001236 


001242 014540 


RECEIVER DATA TEST WITH CRC 
;DATA TABLE 
TBLB: 


~WORD 252 
~ WORD 0 
- WORD 125 
~ WORD 377 
WORN 0 
SIMBCC: MOV RO,-(SP) 
MOV R1,-(SP) 
MOV R2,-(SP) 
MOV (R5)*, TEMP! 
MOV (R5)+,TEMP2 
MOV (R5)¢, TEMP3 
1$ CLR BCCFBK 
MOV TEMP3,RO 
ROR TEMP2 
ADC RO 
BIT #B1T0,RO 
BEQ 2$ 
COM BCCFBK 
2$: MOV XPOLY,RO 
COM RO 
BIC RO,BCCFBK 
CLC 
ROR TEMP3 
MOV BCCFBK,RO 
MOV TEMP3,R1 
MOV R1,R2 
BIC 1,R0 
BIC BCCFBK,R2 
BIS R2,R0 
BIC XPOLY, TEMP3 
BIS RO, TEMPS 
DEC TEMP) 
BNE 1$ 
MOV TEMP3, CALBCC 
MOV (SP)+,R2 
MOV (SP)+,R1 
MOV (SP)+,RO 
RTS R5 
XPOLY: 0 
BCCFBK: 0 
CALBCC: 0 
CRC16=120001 
CRC.CCI]TT=192010 


peeterrerererrereererereree TEST 17 eeeeeernereererereenereeses 
THIS TEST PROVES THAT THE DEVICE WILL 

;OUTPUT SIXTEEN SPACES IN FRONT OF A 

FLAG If STARTING FROM THE IDLE STATE. 


pitteeerereereresereerererrertentatteeeeeeeeeeeeneeteeeEeerETere 


piteateererene 
. 


w 
. 


SEQ 0055 


eS 


CZDPCC MACY11 30A(1052) 


CZDPCD.P1i 


et ts ts os ws st tt CE 
Oo 


FWwNn COON VFWN—O 


NN 
Wn 
—-oo 


NNN NN NNN NON 
Ww 
w 


2741 


014542 


015046 
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104000 
104400 


000017 


000021 


000002 
040000 


000002 
040000 


000125 
000002 
040000 


001240 
000006 


000002 
040000 


000006 
001000 
000016 
164362 


164354 
000125 


ale 09: 


001226 
001216 
164626 


164574 
164564 
164560 
164544 
164546 


001236 


164512 


164474 


164464 
164450 


001240 


164416 


164400 


001242 
001242 


—E 5 
33 PAGE 57 
SPECIAL ZEROES SEQUENCE TEST 
s TEST I7 


. 
-csettaererererrre 


> ;@rererrererrererrrerereeterrereretereteeeteeteetreeteeeetenteteretenetetee 


1S117: 


6$: 


7$: 


10$: 


MOV 


#17,a#TSTNO 

#TST20,NEXT 

MMRESET,@TXCSR ;RESET THE DEVICE 

PC, SMALL WAIT FOR RESET TO FINISH 
TEMP ;CLEAR FOR SOFTWARE STORAGE 
TEMP2 

TEMPS 

@1XDBUF RESET TXDONE 


MMMODE ,@TXCSR ;ENTER MAINT MODE 
MCRCEN,@PARCSR ; TURN OFF CRC 

MSEND ,ATXCSR ; TURN ON TRANSMITTER 
WRCVEN,@RXCSR  ;TURN ON RECEIVER 
MTEOM!TSOM,ATXDBUF ;START SPECIAL SEQUENCE 


ef SYNC _UP DUP 

TEMP 1 ; UPDATE COUNT 
#17.,TEMP1 ;CHECK FOR FINISH 
2$ :BR IF YES 


nik ;POKE CLOCK 
MMIDATA,@TXCSR ;CHECK THE DATA 
1$ ;BR IF OK 
sDATA SHOULD BE A 0, WAS A 1 
m ;POKE CLOCK 
MMTIDATA,QTXCSR ;CHECK THE DATA 
3$ ;BR IF OK 
;DATA SHOULD BE 0, WAS A ONE 
#125, aTXDBUF ;LOAD DATA CHAR 
ot ;POKE CLOCK 
MMTIDATA,ATXCSR ;CHECK THE BIT 
5$ ;BR IF OK 


;DATA SHOULD BE 1, WAS 9 
TEMP2 ; UPDATE FOR FINISH 
#6, 1TEMP2 ; CHECK FOR DONE 
4$ ;BR IF MORE TO GO 


ot :POKE CLOCK 
MMIDATA,OTXCSR ;CHECK THE DATA 
6$ ;BR IF OK 
;DATA SHOULD BE 0, WAS A 1 
,o sSTART OUT DATA CHAR 
#TEOM,ATXCSR sTURN OFF TRANSMITTER 
» View sFINISH 
ARXCSR sCHECK RECEIVER 
7$ :BR IF OK 
sRECEIVER FAILED TO ACCEPT SPECIAL CHAR 
ARXDBUF , TEMPS ;GET THE CHAR 
Cig tetenrs sCHECK IT 


;DATA FAILED TO MATCH AFTER 
SPECIAL SPACES CHARACTER 
;SCOPE THIS TEST 


pttererecenreorerererereran TEST CO weeneenenereererereeereenee 





SEQ 0056 


nS SSS SSS SSS Sess sss Ss 


CZDPCC 
CZDPCD 


POROME PIPPI PPR fh 
SN NNN NN 
uw" 
~N 


761 


MACY11 30A(1052) 
P11 


_—— © 
Sof 


AOWWS WWW — 
OFOoOfrOLrOLG 


200 


MOPsMNP MP 


254 
244 


CSOCSVOVOOCOSVOCOCOCOCCOCOCOOCOCOOOOCOOCOOCOOCOOOO COCOCOCCOOO 


ee ee ed ee eed eed 


08-F EB-79 


004137 
015506 


052777 
004737 


012737 
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000020 
015516 
015144 
001322 
015504 
164274 
007332 


000400 
005044 
001404 


010000 


004000 
004000 


000005 
004000 


004000 


040000 


015272 
041002 


000005 


001226 
001216 
001220 


164266 


164246 


015200 
164230 


164220 


015246 
164162 


164152 


001220 


015324 


F 5 
MODEM CONTROL BITS DIR,RING,AND DSP INTERACTION TEST 


SEQ 0057 


:*THIS TEST PROVES THE INTERACTION OF DIR 

:*WITH RING,DSR 

;*AND DATA SET CHANGE ONE AND DATA SET CHANGE TWO. 
:*SET THE BIT AND VERIFY THE OTHER BITS ARE SET. CLEAR 
:*THE BIT AND VERIFY CLEAR. REPEAT FOR MRESET. 


,  eeeererereerrerttrerreeterereeeteneteeeeeeeneeenetetetereereeere 


reeenerrterete 
* 


; TEST 20 
4 ® 
Sr eererereeres 
; teeter ereeeeereeteretereeeeeeetereteeeeeeeeeeeenetetingnnetetertinere 
TST20: MOV #20,a#TSTNO 
MOV #1ST21, NEXT 
MOV #1$,LOCK 
TSTB TCNFLG 
BNE .*6 
10$: JMP 6$ 
CLR ARXCSR ;CLEAR THE REGISTER 
JSR R1,QOJUMPER sTHIS CALL DETERMINES IF TURNAROUND CONNECTOR 
7$ ;AND GPTIONAL JUMPER ARE USED 
;AND LOADS RS (EXPECTED) ACCORDINGLY. 
BIS MMRESET,@TXCSR ;RESET THE DEVICE 
JSR PC,SMALL ;WAIT FOR RESET TO FINISH 
MOV RXCSR,R3 ;LOAD THE RECEIVER CONTROL REGISTER TO R3. 
CLR (R3) ;CLEAR OUT EXTRA BITS 
BIS #MEXT,@TXCSR sENTER EXTERNAL MAINT. MODE 
1$: BIS #DTR,(R3) 3 TURN ON DIR 
MOV #110,68$% LOAD THE NUMBER 
66$: BIT MTIMER,@TXDBUF ;CHECK THE TIMER BIT 
BNE 66% “BR SF SET 
67$: BIT #TIMER,aTXDBUF > CHECK THE BIT 
BEQ 67% sBR IF CLEAR 
DEC (PC)+ s;DECREMENT THE NUMBER | 
68$: 110 sOF TIMES TO REPEAT } 
BNE 66$ ;BR 1F MORE TO GO 
MOV (R3),Ré ;GET THE BITS FROM THE RXCSR 
CMP R5,R4 >R5=GOOD R4=? 
BEQ 2$ s;BRANCH IF THEY MATCH 
HLT 3 ;NO MATCH = SHOW OPR. 
SCOP 1 
MOV #5,73$% ;LOAD THE NUMRER 
7i$: BIT M\IMER,@TXDBUF ;CHECK THE TIMER BIT 
BNE 71$ :BR IF SET 
72$: BIT MTIMER,@TXDBUF ;CHECK THE BIT 
BEQ 72% :BR IF CLEAR 
DEC (PC)+¢ s;DECREMENT THE NUMBER 
73$: 5 :OF TIMES TO REPEAT 
BNE a ;BR IF MORE TO GO 
BIT #RING, (R3) 
BNE 2$ 
2%: MOV #3$,LOCK 7SwO9 SETUP 
BIC MRING‘DSRIDTR, RS sCLEAR OU! UNWANTED BITS 
3$: CLR (R3) CLEAR OUT THE REGISTER 
MOV #5,78% sLOAD THe NUMBER 


CZDPCC MACY11 30A(1052) 


CZ2DPCD.P11 
2803 015302 
2804 015310 
2805 015312 
2806 015320 
2807 015322 
2808 015324 
2809 015326 
2810 015330 
2811 015332 
2812 015334 
2813 015336 
2814 015340 
2815 015342 
2816 015350 
2817 015354 
2818 015362 
2819 015370 
2820 015372 
2821 015400 
2822 015402 
2823 015404 
2824 015406 
2825 015410 
2826 015412 
2827 018414 
2828 015422 
2829 015426 
2830 015434 
2831 015442 
2832 C€15450 
2833 015452 
2834 015460 
2835 015462 
2836 015464 
2837 015466 
2838 015470 
2839 015472 
2840 015474 
2841 015476 
2842 015500 
2843 015502 
2844 
2845 015504 
2846 015506 
2847 015510 
2848 015512 
2849 015514 
2850 
2851 
2852 
2853 
2854 
2855 
2856 
2857 
2858 
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O8-FEB-79 13:15 


032777 


104401 


104400 
141003 
141001 
001002 
000090 


004000 
004600 


015350 


004000 
00400C 


000400 
005044 


004000 
004000 


164104 
164074 


001220 


015404 
164024 


164014 


163770 
163756 
015464 
163744 


163734 


G 5 


MODEM CONTROL BITS DIR,RING,AND 


763: 
77%: 


78%: 


4$: 
5$: 


81$: 
82%: 


83$: 


86$: 
87$: 


888: 


o$: 
7$: 


;*SET THE BIT AND VERIFY THE OTHER BITS ARE SET. 


seeetereretererereterererer TEST 


#TIMER,aTXOBUF 
76% 
ee 


#5$,L0CK 

#DTR, (R53) 
#5,83$% 
#TIMER,aTXDBUF 
81% 


#TIMER,@TXDBUF 
82% 
(PC)+ 


(R3) 
@MRESET,@TXCSR 
PC, SMALL 
#MEXT,@TXCSR 
#5,88% 

#TIMER ,aTXDBUF 
86% 


6 
TIMER ,aTXOBUF 
87 


DSR INTERACTION TEST 


:CHECK THE TIMER BIT 
;BR IF SET 

;CHECK THE BIT 

:BR IF CLEAR 

:DECREMENT THE NUMBER 

;OF TIMES TO REPEAT 

;BR IF MORE TO GO 

;READ a A THE REGISTER 

:R5=GOOD 

; BRANCH iF “my THE DSC BITS ARE SET 
:NO-GO TELL OPR 


7SwO9 SETUP 

; TURN ON DIR 

;LOAD THE NUMBER 

;CHECY THE TIMER Bil 
;BR IF SET 

;CHECK THE BIT 

3BR IF CLEAR 

;DECREMENT THE NUMBER 
;OF TIMES TO REPEAT 

3;BR IF MORE TO GO 
;CLEAR OUT EXPECTED 
sCLEAR OUT THE REGISTER 
;RESET THE DEVICE 

sWAIT FOR RESET TO FINISH 
; TURN ON EXTERNAL MODE 
;LOAD THE NUMBER 

sCHECK THE TIMER BIT 
3;BR IF SET 

sCHECK THE BIT 

;BR IF CLEAR 

;DECREMENT THE NUMBER 
;OF TIMES TO REPEAT 

;BR IF MORE TO GO 
7STRIP DSCA &DSCB FROM CSR 
;GET THE REGISTER 
>R5=GOOD,R4=? 

;BR IF OK 

sREPORT THE ERROR 
;SwO9=1? 


:SCOPE THE WHOLE TES! 


s*THIS TEST PROVES THE INTERACTION OF RTS 
s*WI1TH CTS,CARDET 
:#AND DATA SET CHANGE ONE AND DATA SET CHANGE TWO. 


CLEAR 


:*THE BIT AND VERIFY CLEAR. REPEAT FOR MRESET. 


pi eeeeeteeneerteseteeeetereeeeeteeeteteeteneteeeeeeeeseneetenener 


21 eeeeeeeerenereenenesesresee 


SEQ 0058 


SS 


(SSS SSS SSS Ss Ss 


CZDPCC 
CZDPCD 


MACY11 30A(1052) 


P11 


ooo 


15612 


ee ee ee ee ee ee eed 
PARAAAMAAAAWNWMAWUT UT 
SOooooeoooconraec 
OW nn FP Www 
OOD FMADBSNMSNWLOS 


w 
Co 
o 
Fa 


672 


SOSCOOCCOOCOCOCOOCOOCOOCOOCOCOOCOOCOOCOOCOCOOCOCOOOCOOCOOOOCOOCOOCOOCOOCOO COCOCCO 


ee ee ee ee ee ced et ce ee oS ce ce ce ce ed ee ced ed et ed 
PPAAAPAAAPAAAAAAA NIU 
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016154 
052777 


000005 


000021 
016164 
015612 
001322 
016152 
163626 
007332 


00040C 
005044 
001404 


010000 


004000 
004000 


000005 
004000 


004000 


040000 


015740 
030004 


000005 
004000 


004000 


001226 
001216 
001220 


163620 


163600 


015646 
163562 


163552 


015714 
163514 


163504 


001220 


015772 
163436 


163426 


H 9» 


MODEM CONTROL BITS RIS,CTS,AND CARDET INTERACTION TEST 


rtererrererere 


TEST 21 


. 
’ 
: 
. 
piteerererrrre 
; 


S121: MOV 


10$: JMP 


77$: BIT 


78$: 5 


#21,a#1STNO 
WTST22,NEXT 
#i$,LOCK 


ORXCSR 
R1,OJUMPER 


MMRESET ,ATXCSR 
PC, SMALL 
RXCSR,R3 

(R3) 
MMEXT,@TXCSR 


66 
#TIMER, aT XDBUF 
67% 

(PC)+ 

66% 

(R3),R4 

R5,R4 

2$ 
3 
#5,73$ 
#TIMER,a@TXDBUF 
71% 
#TIMER,aTXDBUF 
72% 

(PC)+ 


71$ 

#RING, (R3) 
2$ 
#3$,L0CK 


CTS! CARDET!RTS,R5 
(R5) 


#5,78% 
TIMER aT XDBUF 
76% 


#TIMER,aTXOBUF 
77% 
(PC)+ 


Teter eerereererereeeeertereeeeeeeeeeteteeeeeeteeeteneteteteneteeeteeeee 


;CLEAR THE REGISTER 
THIS CALL DETERMINES IF TURNAROUND CONNECTOR 
;AND OPTIONAL JUMPER ARE USED 
:AND LOADS R5 (EXPECTED) ACCORDINGLY. 
;RESET THE DEVICE 
;WAIT FOR RESET TO FINISH 
;LOAD THE RECEIVER CONTROL REGISTER TO R3. 
;CLEAR OUT EXTRA BITS 
sENTER EXTERNAL MAINT. MODE 
; TURN ON RTS 
;LOAD THE NUMBER 
:CHECK THE TIMER BIT 
;BR IF SET 
;CHECK THE BIT 
;BR IF CLEAR 
;DECREMENT THE NUMBER 
;OF TIMES TO REPEAT 
:BR IF MORE TO GO 
:GET THE BITS FROM THE RXCSR 
:R5=GOOD R4=? 
;BRANCH IF THEY MATCH 
3NO MATCH = SHOW OPR. 


;LOAD THE NUMBER 
:CHECK THE TIMER BIT 
:BR IF SET 

> CHECK THE BIT 

;BR IF CLEAR 
;DECREMENT THE NUMBER 
;OF TIMES TO REPEAT 
BR If MORE TO GO 


;SWO9 SETUP 

sCLEAR OUT UNWANTED BITS 
sCLEAR OUT THE REGISTER 

;LOAD THE NUMBER 

sCHECK THE TIMER BIT 

sBR IF SET 

sCHECK THE BIT 

;BR IF CLEAR 

sDECREMENT THE NUMBER 

sOF TIMES TO REPEAT 


SEQ 0059 





CZDPCC 
CZDPCD. 


MACY11 wth: | 


Pi 


016146 
016150 


016152 
016154 
016156 
016160 
016162 


08-FEB-79 
001365 


104401 


104400 
130005 
130001 
000004 
000000 


i 3 
26-FEB-79 09:33 PAGE 61 SEQ 0060 
13:15 MODEM CONTROL BITS RTS,CTS,AND CARDET INTERACTION TEST 
BNE 76$ ;BR IF MORE TO GO 
MOV (R3) RG :READ BACK THE REGISTER 
CMP R5 RG :R5=GOOD R4=? 
BEQ 4$ “BRANCH IF ONLY THE DSC BITS ARE SET 
HLT 3 :NO-GO TELL OPR 
SCOP! 
016016 001220 4s: MOV #5$, LOCK ;$w09 SETUP 
000004 5$: BIS RTS, (R3) ; TURN ON RTS 
000005 016052 MOV #5838 :LOAD THE NUMBER 
004000 163356 81$: BIT MTIMER,@TXDBUF CHECK THE TIMER BIT 
BNE 81$ :BR IF SET 
004000 163346 828: iT MTIMER,ATXDBUF CHECK THE BIT 
BEQ 82$ :BR IF CLEAR 
DEC (PC) 4 :DECREMENT THE NUMBER 
83$: 5 OF TIMES TO REPEAT 
BNE 81$ :BR IF MORE TO GO 
CLR RS ;CLEAR OUT EXPECTED 
CLR (R3) :CLEAR OUT THE REGISTER 
000400 163322 BIS WMRESET,@TXCSR :RESET THE DEVICE 
005044 JSR PC, SMALL ;WAIT FOR RESET TO FINISH 
010000 163310 BIS WMEXT,@TXCSR ©; TURN ON EXTERNAL MODE 
000005 016132 MOV #5 88% ;LOAD THE NUMBER 
004000 163276 86$: BIT WTIMER,@TXDBUF CHECK THE TIMER BIT 
BNE 86$ :BR IF SET 
004000 163266 87$: BIT WTIMER,@TXDBUF CHECK THE BIT 
BEO 87$ :BR IF CLEAR 
DEC (PC)¢ :DECREMENT THE NUMBER 
88$: 5 ;OF TIMES TO REPEAT 
BNE 86$ :BR IF MORE TO GO 
1S] (R3) ;STRIP DSCA &DSCB FROM CSR 
MOV (R3) RG :GET THE REGISTER 
CMP R5,R4 ;R5=GOOD ,R4=? 
BEQ 6$ :BR IF OK 
HLT 3 :REPORT THE ERROR 
SCOP1 ;SWO9=1? 
6$: SCOPE ;SCOPE THE WHOLE TEST 
7$: “WORD 130005 
“WORD 130001 
-WORD 
-WORD 0 


pereetereretenerererre ete ee TES T 22 tteereeeeereenrrerererereres 


:*THIS TEST PROVES THE INTERACTION OF STD 

;*WITH STD,SRD 
:*AND DATA SET CHANGE ONE AND DATA SET CHANGE TWO. 
;*SET THE BIT AND VERIFY THE OTHER BITS ARE SET. CLEAR 
;*THE BIT AND VERIFY CLEAR. REPEAT FOR MRESET. 


pr etererseerrererereserereeeeerarenheretenereneetenerentetentene 


preteen renne 
* TEST 22 
Sreeeeeeeennee 


CZDPCC 


MACY11 wy 


CZDPCD.P11 


016460 


08-FEB-79 


ooocoo--— 


016636 
052777 


011304 


13:1 


000022 
016646 
016274 
001322 


016634 
001334 


001336 
163144 
007332 


000400 
005044 
001404 
010000 
000010 
000110 
004000 


004000 


000005 
004000 


004000 


040000 


016422 
002010 


000005 
004000 


004000 


001226 
001216 
001220 


163136 


163116 


016339 
163100 


163070 


016376 
163632 


163022 


001220 


016454 
162754 


162744 
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J 


62 
MODEM CONTROL BITS STD AND SRD INTERACTION TEST 


r@eereerereeererereretereeeeeeeeteeeeeeeeee tetera etereeeeeeeeeteee 


$122: 


108: 


71$: 
72%: 


73$: 


2$: 


3$: 


7o$: 
77%: 


78$: 


MOV 


#22,a#TSTNO 
#TST23,NEXT 


@RXCSR 
Ri ,QJUMPER 


MMRESET @TXCSR 
PC, SMALL 
RXCSR,R3 

(R3) 
#MEXT,@TXCSR 
#STD,(R3) 
#110,68$ 
#TIMER ,aTXDBUF 
66% 


#TIMER ,aTXDBUF 
67 


#5,73$ 

ATIMER ,aTXDBUF 
71$ 

#TIMER ,aTXDBUF 
72% 

(PC)+ 


71% 

#RING, (R3) 

2$ 

#3$,L0CK 

#STD'SRD,RS 
(R3) 

#5,78% 

#TIMER,aTXDBUF 
76$ 
TIMER ,aT XDBUF 
77$ 

(PC)+ 


76% 
(R3),R4 


:CLEAR THE REGISTER 

THIS CALL DETERMINES IF TURNAROUND CONNECTOR 
AND OPTIONAL JUMPER ARE USED 

;AND LOADS R5 (EXPECTED) ACCORDINGLY. 

sRESET THE DEVICE 

s;WAIT FOR RESET TO FINISH 

;LOAD THE RECEIVER CONTROL REGISTER TO R35. 
;CLEAR OUT EXTRA BITS 
sENTER EXTERNAL MAINT. 
; TURN ON STD 


MODE 


LOAD THE NUMBER 
; CHECK The TIMER BIT 
:BR IF SET 


:CHECK THE BIT 

;BR IF CLEAR 

;DECREMENT THE NUMBER 

;OF TIMES TO REPEAT 

:BR IF MORE TO GO 

;GET THE BITS FROM THE RXCSR 
:R5=GOOD R4=? 

;BRANCH IF THEY MATCH 

;NO MATCH = SHOW OPR. 


;LOAD THE NUMBER 
:CHECK THE TIMER BIT 
:BR IF SET 

;CHECK THE BIT 

7;BR IF CLEAR 
;DECREMENT THE NUMBER 
:OF TIMES TO REPEAT 
;BR IF MORE TO GO 


;$wO9 SETUP 


:CLEAR OUT UNWANTED BITS 


;CLEAR OUT THE REGISTER 
;LOAD THE NUMBER 

;CHECK THE TIMER BIT 
:BR IF SET 

;CHECK THE BIT 

;BR IF CLEAR 

;DECREMENT THE NUMBER 
:OF TIMES TO REPEAT 

:BR If MORE TO GO 

READ BACK THE REGISTER 


SEQ 0061 | 
| 
| 


ba aad 


CZDPCC MACY11 30A(1052) 


CZDPCD.P11 


508? 


016462 


016646 012737 000023 001226 


O&-FEB-79 1 
020504 


000000 


K 5 
ote FEB-79 09:33 PAGE 63 SEQ 0062 
13:15 MODEM CONTROL BITS STD AND SRD INTERACTION TEST 
CMP R5,R4 :R5=GO0D R4=? 
BEQ 4$ ;BRANCH IF ONLY THE DSC BITS ARE SET 
HLT 3 ;NO-GO TELL OPR 
SCOP 1 
016500 001220 4$: MOV #5$,LOCK :$WO9 SETUP 
000010 5$: BIS #STD, (R35) 7 TURN ON STD 
000005 016534 MOV #5 ,83$ ;LOAD THE NUMBER 
004009 162674 81%: BIT MATIMER,@TXOBUF ;CHECK THE TIMER BIT 
BNE 81% ;BR IF SET 
004000 162664 82%: BIT MTIMER,@TXDBUF ; CHECK THE BIT 
BEQ 82% ;BR IF CLEAR 
DEC (PC)+ :DECREMENT THE NUMBER 
838: 5 :OF TIMES TO REPEAT 
BNE &1$ 7BR IF MORE TO GO 
CLR R5 ;CLEAR OUT EXPECTED 
CLR (R3) ;CLEAR OUT THE REGISTER 
000400 162640 BIS MMRESET,@TXCSR ;RESET THE DEVICE 
005044 JSR PC, SMALL ;WAIT FOR RESET TO FINISH 
010000 162626 BIS WMEXT,@TXCSR ; TURN ON EXTERNAL MODE 
000005 016614 MOV #5 ,88% ;LOAD THE NUMBER 
004000 162614 86$: BIT MTIMER,@TXDBUF ;CHECK THE TIMER BIT 
BNE 86$ :BR IF SET 
004000 162604 87$: BIT MTIMER,@TXDBUF ; CHECK THE BIT 
BEQ 87% 7BR IF CLEAR 
DEC (PC)+ ;DECREMENT THE NUMBER 
88$: 5 ;OF TIMES TO REPEAT 
BNE 86$ 7BR IF MORE TO GO 
TST (R3) ;STRIP DSCA &DSCB FROF CS 
MOV (R3),R4 ;GET THE REGISTER 
CMP R5,R4 >R5=GOOD,R4=? 
BEQ 6$ ;BR IF OK 
HLT 3 ;REPORT THE ERROR ? 
SCOP 1 ;SWO9=1? 
6$: SCOPE ;SCOPE THE WHOLE TEST 
7$: WORD 2011 
- WORD 2001 
WORD 10 
WORD 0 
peererrererereeeeererereeee TEST 23 exenenereereereeereerereree 
;*THIS TEST PROVES THE INTERACTION OF DiR!IRTS!STD 
s*W1TH RING, DSR,CTS,CARDET,STD,SRD 
;*AND DATA SET CHANGE ONE AND DATA SET CHANGE TWO. 
;*SET THE BIT AND VERIFY THE OTHER BITS ARE SET. CLEAR 
+ *THE BIT AND VERIFY CLEAR. REPEAT FOR MRESET 
- PPTOTITITITITITITITIT TTT TIT TTT TTT TTT TTT TT TIT TT TTT TT TTT 
peestonsesones 
: * 
3 TEST 23 F 
P ° , 
peennegsosooss 
PIMMMRATA MARTE K ATH R TREK EET TREE T TATRA A AACR ee eee Hee eee Tee 
1$123: MOV #23, a#TSTNO 


“Ss &. nee 
CZDPCC MACY11 30A(1052) 26-FEB-79 09:33 PAGE 64 SEQ 0063 


CZDPCD.P11 O8-FEB-79 13:15 ALL MODEM CONTROL BITS INTERACTION TEST 
3083 016654 012737 017330 001216 MOV #1ST24,NEXT F 
3084 016662 012737 016756 001220 MOV #1$,LOCK 
3085 016670 105737 001322 TSTB TCNFLG 
3086 016674 001002 BNE .*6 
3087 016676 000137 017316 10$: JMP 6$ 
3088 016702 105737 001334 7S$18 STJMFL 
3089 016706 001773 brQ 10% 
3090 016710 105737 001336 TSTB SRJMFL 
3091 016714 001770 BEQ 10% 
3092 016716 005077 162462 CLR ARXCSR ;CLEAR THE REGISTER 
3093 016722 004137 007332 JSR R1,0JUMPER ; THIS CALL DETERMINES IF TURNAROUND CONNECTOR 
3094 016726 017320 7% ;AND OPTIONAL JUMPER ARE USED 
3095 ;AND LOADS R5 (EXPECTED) ACCORDINGLY. 
3096 016730 052777 000400 162454 BIS MMRESET,@TIXCSR ;RESET THE DEVICE 
3097 016736 004737 005044 JSR PC,SMALL ;WAIT FOR RESET TO FINISH 
3098 016742 013703 001404 MOV RXCSR,R3 ;LOAD THE RECEIVER CONTROL REGISTER TO R3. 
3099 016746 005013 CLR (R3) ;CLEAR OUT EXTRA BITS 
3100 016750 052777 O1000C 162434 BIS MMEXT,@TXCSR sENTER EXTERNAL MAINT. MODE 
3101 016756 052713 000016 1$: BIS MDTRIRTS!STD, (R3) ;TURN ON DTRIRTS!STD 
3102 016762 012737 000110 017012 MOV #110,68% ;LOAD THE NUMBER 
3103 016770 032777 004000 162416 668: BIT @TIMER,@TXDBUF ;CHECK THE TIMER BIT 
3104 016776 001374 BNE 66% :BR IF SET 
3105 017000 032777 004000 162406 67%: BIT MTIMER,@TXDBUF ;CHECK THE BIT 
3106 017006 001774 BEQ 67% ;BR IF CLEAR 
3107 017010 005327 DEC (PC)+ ;DECREMENT THE NUMBER 
3108 017012 000110 68$: 110 ;OF TIMES TO REPEAT 
3109 017014 001365 BNE 66% ;BR IF MORE TO GO 
3110 017016 011304 MOV (R3),R4 3;GET THE BITS FROM THE RXCSR 
3111 017020 020504 CMP R5,R4 ;R5=GOOD R4=? 
3112 017022 001423 BEQ 2$ ;BRANCH IF THEY MATCH 
3113 017024 104003 HLT 3 ;NO MATCH = SHOW OPR. 
3114 017026 104401 SCOP 1 
2115 017030 012737 000005 017060 MOV #5,73% ;LOAD THE NUMBER 
3116 017036 032777 004000 162350 71$: BIT MTIMER,@TXDBUF ;CHECK THE TIMER BIT 
3117 017044 001374 BNE 71$ sBR IF SET 
3118 017046 032777 004000 162340 72$: BIT MTIMER,@TXDBUF ;CHECK THE BIT 
3119 017054 001774 BEQ 72% 7BR IF CLEAR 
3120 017056 005327 DEC (PC)+ ;DECREMENT THE NUMBER 
3121 017060 000005 73$: 5 ;OF TIMES TO REPEAT 
3122 017062 001365 BNE 71% ;BR IF MORE T0 GO 
3123 017064 032713 040000 BIT #RING, (R53) 
31246 017070 001000 BNE 2$ 
3125 017072 012737 017104 001220 2$: MOV #3$,LO0CK ;SWO9 SETUP 
3126 017100 042705 073016 BIC MRINGICTS!CARDET!SRD!IDSRISTDIRTS!DIR,RS sCLEAR OUT UNWANTED BITS 
3127 017104 005013 3$: CLR (R3) sCLEAR OUT THE REGISTER 
3128 017106 012737 000005 017136 MOV #5,78% ;LOAD THE NUMBER 
3129 017114 032777 004000 162272 /76$: BIT #TIMER,@TXDBUF ;CHECK THE TIMER BJT 
3130 017122 001374 BNE 76% ;BR IF SET 
3131 017124 032777 004000 162262 77%: BIT MTIMER,@TXDBUF ;CHECK THE BIT 
3132 017132 001774 BEQ 77$ ;BR IF CLEAR 
3133 017134 005327 DEC (PC)+ sDECREMENT THE NUMBER 
3134 017136 000005 78$: 5 ;OF TIMES TO REPEAT 
3135 017140 001365 BNE 76% ;BR IF MORE TO GO 
2136 0171462 011304 MOV (R3),R4 sREAD BACK THE REGISTER 
3137 017144 020504 CMP R5,R4 :R5=GOOD R4=? 
3138 017146 001402 BEQ 4$ ;BRANCH IF ONLY THE DSC BITS ARE SET 
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3139 017150 104003 HLT 3 :NO-GO TELL OPR 

3140 017152 104401 SCOP 1 

3141 0171546 912737 017162 001220 4$: MOV #5$,LOCK ;SWO9 SETUP 

3142 017162 052713 000016 5$: BIS MOTRIRTS!STD, (R35) ; TURN ON DIRIRTS!STD 

3143 017166 012737 000005 017216 MOV #5 ,83$ ;LOAD THE NUMBER 

3144 017174 032777 004000 162212 818: Bll MTIMER,@TXDBUF ;CHECK THE TIMER BIT 

3145 017202 001374 BNE 81% :BR IF SET 

3146 017204 032777 004009 162202 82%: BIT MTIMER,@IXDBUF ;CHECK THE BIT 

3147 017212 001774 BEQ 82% ;BR IF CLEAR 

3148 017214 005327 DEC (PC)+ ;DECREMENT THE NUMBER 

3149 017216 900005 83$: 5 ;OF TIMES TO REPEAT 

3150 017220 001365 BNE 81% :BR IF MORE TO GO 

3151 017222 005005 CLR R5 :CLEAR OUT EXPECTED 

3152 017224 005013 CLR (R3) ;CLEAR OUT THE REGISTER 

3153 017226 052777 000400 162156 BIS MMRESET,@TXCSR ;RESET THE DEVICE 

3154 017234 004737 005044 JSR PC,SMALL sWAIT FOR RESET TO FINISH 

3155 017240 052777 010000 162144 BIS WMEXT @TXCSR ; TURN ON EXTERNAL MODE 

3156 017246 012737 000005 017276 MOV #5 ,88% ;LOAD THE NUMBER 

3157 017254 032777 004000 162132 86$: BIT MTIMER,@TXDBUF ;CHECK THE TIMER BIT 

3158 017262 001374 BNE 86% :BR IF SET 

3159 017264 03277” 004000 162122 87$: BIT #TIMER,@TXDBUF ;CHECK THE BIT 

3160 017272 001774 BEQ 87% ;BR IF CLEAR 

3161 017274 005327 DEC (PC)+ ;DECREMENT THE NUMBER 

3162 017276 000005 88$: 5 :OF TIMES TO REPEAT 

3163 017300 001365 BNE 86% :BR IF MORE TO GO 

3164 017302 005713 TST (R3) :STRIP DSCA &DSCB FROM CSR 

3165 017304 011304 MOV (R3) ,R4 :GET THE REGISTER 

3166 017306 020504 ‘ CMP R5,R4 7R5=GOOD,R4=? 

3167 017310 001402 BEQ 6$ :BR IF OK 

3168 017312 104003 HL1 3 ;REPORT THE ERROR 

1% 017314 104401 SCOP1 7SwO9=1? 

2171 017316 104400 6$: SCOPE ;SCOPE THE WHOLE TEST 

3172 017320 173017 7$: «WORD 173017 

3173 017322 173001 -WORD 173001 

3174 017324 001016 «WORD 1016 

Ae 017326 000000 «WORD 0 

3179 pteerrerertererererereeeeee TEST 24 eeeerenerererenrererrererene 

3178 s*TEST THAT SETTING TRANSMIT INTERRUPT 

3179 ;*ENABLE AND TRANSMITTER DONE PRODUCE 

3180 7*AN INTERRUPT ON THE TRANSMITTER VECTOR. 

3181 piteeeeeeeeeereeet eee e eee eee eee eT ee 

3182 

3183 pittereneneeee 

3184 : * 

3185 3; TEST 24 

3186 ; 

3187 piteennererens 

3188 piteeeeeneereretrertereneete rete eee eee eee eee eee eee eee Tee 

3189 017330 012737 000024 001226 S124: MOV #24,a#TSTNO 

3190 017336 012737 017446 001216 MOV #TST25,NEXT 

3191 017344 012706 001150 MOV #STACK,SP 

3192 017350 000005 RESET 

3193 017352 012737 000340 177776 MOV #340,PS ;LOCK OUT INTERRUPTS 

3194 017360 052777 000400 162024 BIS MMRESET.QIXCSR [RESET THE DEVICE 
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3195 017366 004737 005044 JSR PC,SMALL sWAIT FOR RESET TO FINISH 
3196 017372 004537 007232 JSR R5,SETVEC SET UP 18. VECTORS 
3197 017376 007254 NO.ATRAP SVECT OR 
3198 017400 017434 1$ [VECTOR a. 
3199 017402 340 340 BYTE 340, 340 SPRIORITY 
3200 017404 052777 004000 162000 BIS MSYSTST,@TXCSR 
3201 017412 0050357 177776 CLR PS 3ZERO CPU PRIORITY 
3202 017416 052777 000109 161766 BIS WIXINTE,@TXCSR ;TURN ON TXINT ENABLE 
3203 017424 000240 NOP STALL 
3204 017426 000240 NOP ;D1TTO 
3205 017430 000240 NOP ;01TT0 
3206 017432 104027 HLT 27 sDUP FAILED TO INTERRUPT 
3207 017434 012706 001150 1$: MOV #STACK,SP ;RESET THE STAC 
3208 017440 005077 161746 CLR aTXCSR DISABLE DUP11 
st 017444 104490 SCOPE ;SCOPE THIS TEST 
3211 pteeereerererterererererere TEST 25 strteneetererereesererceeee 
3212 :*TEST TO VERIFY THAT A TRANSMITTER DONE 
3213 s*INTERRUPT WILL ONLY OCCUR ONCE IF THE 
3214 2 TXCSR AND TXDBUF ARE *NOT®* READ OR WRITTEN. 
3215 Leeeeeeeeeteeterterertteerertenererebereeeeereeeeerererererenes 
3216 
3217 piteeeeeereres 
3218 : * 
3219 ; TEST 25 
3220 ; 
3221 piteenreneeret 
3222 s eeeeeerertetereereretetererereeterteretenereneerereaeeneEnenereeTese 
3223 017446 012737 000025 001226 TST25: MOV #25,a#1STNO 
3224 017454 012737 017640 001216 MOV #1ST26,NEXT 
3225 017462 012737 000340 177776 MOV #340,PS ;LOCK OUT INTERRUPTS 
3226 017470 052777 000400 161714 BIS WMRESET,@TXCSR ;RESET THE DEVICE 
2227 017476 004737 005044 JSR PC,SMALL ;WAIT FOR RESET TO FINISH 
3228 017502 004537 007232 JSR R5,SETVEC ;SETUP FOR INTERRUPTS 
3229 017506 067254 NO.ATRAP ;RECEIVER 
3230 017510 017610 1$ ; TRANSMITTER 
3231 017512 340 340 BYTE 340,340 LEV EL 
3232 017514 052777 004000 161670 BIS WSYSTST,@TXCSR ; TURN ON CLOCK 
3233 017522 052777 000100 161662 BIS MIXINTE,@TXCSR ;TURN ON INT. ENABLE 
3234 017530 005037 177776 CLR PS SLOWER PROCESSOR STATUS 
3235 017534 000240 NOP > STALL 
3236 4017536 000240 NOP :DI1TTO 
3237 017540 000240 NOP ;DITTO 
3238 017542 104027 HLT 27 [DUP FAILED TO INTERRUPT 
3239 017544 000411 BR 5$ ;LEAVE TEST 
3240 017546 005037 177776 es: CLR PS sLOWER PROCESSOR STATUS 
3241 017552 000240 NOP STALL 
3242 017554 000240 NOP +4 
3243 017556 000240 NOP i011 
3244 017560 105777 161626 4$: TSTB aTxXCSR sO aecR THE DONE BIT 
3245 017564 100401 BM] 5$ : BR IF SET 
3246 017566 104024 HLT 24 DONE IS CLEARED AND SHOULDN'T BE 
3247 017570 012737 003460 177776 5%: MOV #340,PS sRAISE PROCESSOR STATUS 
3248 017576 005077 161610 CLR aTxcSR CLEAR OuT DUP 
3249 017602 012706 001150 MOV @STACK,SP sRESET STACK 
3250 017606 104400 SCOPE sSCOPE TrelS TES! 
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017546 
007232 


340 


017560 


000026 
020156 
601322 


020144 
017734 


004000 
004000 


001150 
161360 
020044 


001220 
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ONLY ONE INTERRUPT PER TXDONE TEST 





1$: MOV #2%, (SP) ;SET UP SECOND PART OF TEST 
JSR RS,SETVEC ;SETUP FOR SECOND INTERRUPT TRY 
NO.ATRAP RECEIVER 
$ ; TRANSMITTER 
BYTE 340,340 sLEVEL 
$3 Tl ;RETURN 
HLT 26 sREPORT THE FACT YOU GOT HERE 
MOV #4$,(SP) ;SETUP FOR END OF TEST 
RT] ;RETURN 


*TEST THAT SETTING DATA 
> *ENABLE AND RECEIVING A 


tererereerererrereereerere TEST 26 teeeeeerererrerrerserrerere 


SET INTERRUPT 
DATA SET 


>*CHANGE 1 OR DATA SET CHANGE 2 
;*PRODUCES AN INTERRUPT TO THE 


*RECEIVER VECTOR 


,  : eererrrereterererenererereereererenetereereerererenteeseeteeee 


s.:eeenerereeee 
« 


; TEST 26 
° ® 
liteeeneeeeres 
pi eeeeeeeeeeeerereeeeeeteereeeeeteeereneereneeeeeetereettereereeeeerete 
TST26: MOV #26,a#TSTNO 
MOV #TST27,NEXT 
TSTB TCNFLG 
BNE +6 
JMP 5$ 
MOV #1$,LOCK 3SwO9 SETUP 
MOV #340,PS ;LOCK OUT INTERRUPTS 
BIS MMRESET,@TXCSR ;RESET THE DEVICE 
JSR PC, SMALL sWAIT FOR RESET TO FINISH 
BIS #MEXT,@TXCSR sENTER MAINT EXTERNAL MODE 
JSR R5,SETVEC 7SET UP VECTORS 
es ;RECEIVER 
NO.BTRAP ; TRANSMITTER 
BYTE 340,340 sPRORITY AT 7 
1$ CLR PS SLOWER PS 
BIS WDSINTE,@RXCSR ;TURN ON INT. ENABLE 
BIS #RTS,ARXCSR ; TURN ON INT. BiT 
MOV #5,68$% ;LOAD THE NUMBER 
66$: BIT MTIMER,@TXDBUF ;CHECK THE TIMER BIT 
BNE 66$ :BR IF SET 
67$: BIT MTIMER,@TXDBUF ;CHECK THE BIT 
BEQ 67% :BR IF CLEAR 
DEC (PC)¢ :DECREMENT THE NUMBER 
68$: 5 sOF TIMES TO REPEAT 
BNE 66% ;BR IF MORE TO GO 
HLT 22 sFAILED TO INTERRUPT 
SCOP) > SwWO9=1 
2$ MOV @STACK,SP sRESET THE STACK 
CLR @RXCSR sCLEAR OUT RECEIVER CONTRL REGISIER. 
MOV #3$,L.0CK :SwO9 SETUP 


SEQ 0066 | 
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004537 


104401 


032777 
001001 
104023 


005077 
012706 
104400 


007232 


004000 
004000 


000027 


000020 


000005 
004000 
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161244 


001226 
001216 
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RECEIVER DATA SET CHANGE BITS INTERRUPT TEST 


JSR 
4% 


NO.BTRAP 


.BYTE 
3$: MOV 


71$: BIT 
72%: BIT 


73$: 110. 


4$: 


5$: CLR 
MOV 
SCOPE 


S127: MOV 


1$: 
66$: 


reeeeeeeteeet 


RS, SETVEC 


WOSINTE ,aRXCSR 
PS 


#OTR,ARXCSR 
#110.,73% 
TIMER, -@1XD0BUF 


#TIMER, aT XDBUF 
72% 
(PC)+ 


#BITIS,ARXCSR 
5$ 
23 


@RXCSR 
#STACK,SP 


#27,a#TSTNO 
#TST30,NEXT 
#340,PS 
MMRESET,QTXCSR 
PC,SMALL 
MSYSTST,ATXCSR 
R5,SETVEC 


340,340 

PS 
WRCVEN,ORXCSR 
WRINTEN,ARXCSR 
#SEND ,ATXCSR 


#5 68% 
#TIMER,a1XDBUF 
66% 


:SET THE VECTORS 
RECEIVER 

S TRANSMITTERS 
;PRIOR a7 


LOAD TEMP1 


; TURN ON INT. 


ENABLE 


;LOWER CPU STATUS 


PUSH OUT INT. 


B1iS 
;LOAD THE NUMBER 


sCHECK THE TIMER BIT 
:BR IF SET 

> CHECK THE BIT 

;BR IF CLEAR 
;DECREMENT THE NUMBER 
OF TIMES TO REPEAT 
:BR IF MORE TO GO 
FAILED TO iNTERRUPT 
;B1T09=1? 


:CHECK FOR INTERRUPT FROM %SC1 
3:11 CAME FROM DSC1 

7B1T15 IS CLEARED - INTERRUPTED 
>FROM THE WRONG DSC BIT. 

;CLEAR OUT RECEIVER CONTROL REG 
;RESET THE STACK 

;SCOPE THIS TEST 
perertererererrereeeeteeeee TEST 27 eeeeeeeeeeteeeteeeeeererere 
7*TEST THAT SETTING RECEIVER INTERRUPT 

;*ENABLE AND RECEIVER DONE CAUSES AN 

>*INTERRUPT 10 THE RECEIVER VECTOR 


, tere ereeeeereeeerereereeeeeteeeeeneeaeeteeeeeeeeeeeeteeeterene 


LOCK OUT INTERRUPTS 
TRESET THE DEVICE 
WAIT FOR RESET TO FINISH 


SENTER SYSTEM TEST MODE 
;SET UP VECTORS 
:RECEIVER 

; TRANSMITTER 

sPRIORITY AT 7 

s;LOWER PS 

; TURN ON RECEIVER 


; TURN ON INT. 


ENABLE 


; TURN ON TRANSMITTER 


;LOAD THE NUMBER 
;CHECK THE TIMER BI! 
:BR IF Set 


SEQ 0067 
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eae ete 


001061 
104024 


012777 


104400 
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13:15 RECEIVER DONE BIT INTERRUPT TEST 
004000 161110 67$: BIT #TIMER,@TXDBUF ;CHECK THE BIT 
BEQ 67% 7BR IF CLEAR 
DEC (PC)+ ;DECREMENT THE NUMBER 
68$: 5 :OF TIMES TO REPEAT 
BNE 66% :BR IF MORE TO GO 
0C0200 161070 B11 MTIXDONE ,@TXCSR ;TEST TXDONE 
BNE 2$ ‘BR IF SET 
% HLT 24 : TXDONE FAILED TO SET 
000400 161060 MOV #400,a1XDBUF ;LOAD TX BUFFER 
161052 TSTB aTXCSR ;CHECK FOR 
BPL 74 ; DONE 
161046 CLR aT XDBUF ;CLEAR TX BUFFER 
161040 TSTB aTXCSR ;AND CHECK 
BPL 74 :FOR DONE 
001000 161032 MOV #1000, aTXDBUF ;LOAD END OF MSG 
000050 020412 MOV #40.,73% ;LOAD THE NUMBER 
00400C 161016 71$: BIT MTIMER,@TXDBUF ;CHECK THE TIMER BIT 
BNE 71% :BR IF SET 
004000 161006 /72$: BIT MTIMER,@TXDBUF ;CHECK THE BIT 
BEQ 72$ ;BR IF CLEAR 
DEC (PC)+ ;DECREMENT THE NUMBER 
73$: 40. ;OF TIMES TO REPEAT 
BNE 71$ ;BR IF MORE TO GO 
HLT 22 ;RECEIVER FAILED TO INTERRUPT 
001150 3%: MOV #STACK,SP sRESET STACK 
160754 CLR ARXCSR sCLEAR OUT REGISTER 
160756 CLR aTXCSR :DITTO 
SCOPE ;SCOPE THIS TEST 
peteteterereeerereererereerene TEST 30 eeneneeeeereerertrererrerees 
S*TEST TO VERIFY THAT A RECEIVER DONE 
s*]NTERRUPT WILL ONLY OCCUR ONCE IF THE 
> *RXCSR AND RXDBUF ARE NOT READ OR WRITTEN 
pitteterererrererereererter eee eee eee eee eee rere eee eee 
piteerenteeees 
. © 
: TEST 30 
; ® 
piteewerrerene 
EPP SS SSSSESSSESE SSS SSIES EEE SEE EEE REESE SESE SESS eee ESE aa 
000030 001226 18130: MOv #30,a#TSTNO 
021016 001216 MOV #TST31,NEXT 
000340 177776 MOV #340,P PS ;LOCK OUT INTERRUPTS 
000400 160724 BIS #MRESET -@TXCSR ;RESET THE DEVICE 
005044 JSR PC,SM ALL ;WAIT FOR RESET TO FINISH 
004000 160712 BIS #SYSTST @TXCSR “ENTER SYSTST MODE 
007232 JSR R5,SETVEC :SETUP VECTORS 
sRECEIVER VECTOR 
340 -BYTE 340,340 LEVEL 
000020 160664 BIS #RCOVEN,@RXCSR : TURN ON RECEIVER 
000100 160656 BIS MRINTEN,ARXCSR ;TURN ON INT. ENABLE 
000020 160656 BIS #SEND,aTXCSR TURN ON TRANSMITTER 


6$ 
NO.BTRAP hy 7 mye VECTOR 
| 
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3419 020534 012737 000005 020564 MOV #5,68% ;LOAD THE NUMBER 

3420 020542 032777 004000 160644 668: BIT MTIMER,@TXDBUF ;CHECK THE TIMER BIT 

3421 020550 601374 BNE 66% 7BR IF SET 

3422 020552 032777 004000 160634 678%: Bli MTIMER,@TXDBUF ;CHECK THE BIT 

3423 020560 001774 BEQ 67$ ;BR IF CLEAR 

3424 020562 005327 DEC (PC)+ ;DECREMENT THE NUMBER 

3425 020564 000005 68$: 5 sOF TIMES TO REPEAT 

3426 020566 001365 BNE 66% ;BR IF MORE TO GO 

3427 020570 032777 000200 160614 Bil WTIXDONE ,@TXCSR ;TEST TXDONE “ 

3428 020576 001001 BNE 2% sWAIT 

3429 020600 104024 HLT 24 ; TXDONE FAILED TO SET 

3430 020602 012777 000400 160604 2%: MOV #1SOM,aTXDBUF sLOAD TX BUFFER 

3431 020610 105777 160576 TSTB aTXCSR ; CHECK DONE 

3432 020614 100375 BPL 74 :AND THEN 

3433 020616 005077 160572 CLR aTxDBuF ;LOAD BUFFER 

3434 020622 105777 160564 TSTB aTXCSR sAND CHECK 

3435 020626 100375 BPL 74 ;DONE AGAIN, THEN 

3436 020630 012777 001000 160556 MOV #TEOM,ATXDBUF ;SET END OF MSG 

3437 020636 005037 177776 CLR PS sLOWER PS 

3438 020642 108: 

3439 020642 012737 000050 020672 MCV #40.,73% ;LOAD THE NUMBER 

3440 020650 032777 004000 160536 1$: BIT MTIMER,@TXDBUF ;CHECK THE TIMER BIT 

3441 020656 001374 BNE 71$ sBR IF SET 

3442 020660 032777 004000 160526 728: BIT MTIMER,QTXDBUF ;CHECK THE BIT 

$443 020666 001774 BEQ 72% 7BR IF CLEAR 

3444 020670 005327 DEC (PC)+ ;DECREMENT THE NUMBER 

3445 020672 000050 73$: 40. ;OF TIMES TO REPEAT 

3446 020674 001365 BNE 71% ;BR IF MORE TO GO 

3447 020676 104022 HLT 22 sRECEIVER FAILED TO INTERRUPT 

3448 020700 000420 BR 5$ s LEAVE 

3449 020702 3$: 

3450 020702 032777 004000 160504 748: BIT MTIMER,@TXDBUF ;CHECK THE TIMER BIT 

2451 020710 001374 BNE 74% 3BR IF SET 

3452 020712 032777 004000 160474 758: BIT MTIMER,ATXDBUF ;CHECK THE TIMER BIT 

3453 020720 0061774 BEQ 75$ 3BR IF CLEAR 

3454 020722 012737 000340 177776 MOV #340,PS sRAISE PS 

3455 020730 033777 000290 160446 BIT RXDONE ,@RXCSR ; TEST RXDONE 

3456 020736 0601001 BNE 5$ ;BR IF SET 

3457 020740 104024 HLT 24 ;RXDONE IS NOT SET AND SHOULD BE 

3458 020742 012737 000340 177776 S$: MOV #340,PS sLOCKOUT INTERRUPTS 

3459 020750 005077 160430 CLR ARXCSR ;CLEAR OUT DEVICE 

3460 020754 005077 160426 CLR aRXDBUF :DITTO 

3461 020760 012706 001150 MOV @STACK,SP sRESET THE STACK 

3462 020764 104400 SCOPE :SCOPE THIS TEST 

34635 020766 6$: 

3464 020766 012716 020702 MOV #3$,(SP) :2ND PART SETUP 

3465 020772 004537 007252 JSR R5,SETVEC ;SETUP FOR SECOND JNTERRUPT TRY 

3466 020776 021006 : 7$ sRECEIVER VECTOR 

3467 021000 007260 NO.BIRAP s TRANSMITTER VECTOR 

3468 021002 340 340 BYTE 340,340 sLEVEL 

3469 021004 000002 RT1 RETURN 

3470 021006 7$: 

3471 021006 104023 HLT 23 sREPORT THE FACT YOU GOT HERE 

3472 :YOU TOOK A SECOND INTERRUPT AND SHOULDN'T HAVE 

3473 021010 012716 020742 MOV #5$, (SP) sSETUP TO LEAVE TEST 


3474 021014 000002 RT] sLEAVE 
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3475 
3476 ptereeerererereereeereeeere TEST 5] erererecererererereceereree 
3477 s*TEST TO VERIFY THAT INTERRUPT VECTOR ‘‘A"’ 
3478 > *OCCURS BEFORE INTERRUPT VECTOR ‘'B’’ EVEN 
3479 :*WHEN VECTOR ‘‘B’’ 1S ENABLED BEFORE 
3480 s*VECTOR ‘A’ 
3481 pittrrerreretrererereterererttereerereeeeeereeeetereireeeenteere 
3482 
3483 pitrereenerens 
3484 : 
3485 ; TEST 31 
3486 : 
3487 piteererereres 
3488 piteereererereteteretereterrertereetereetereeeeeeReeeeerereeerereretet 
3489 021016 012737 000031 001226 15131: MOv #31 ,a#TSTNO 
3490 021024 012737 021356 001216 MOV #1ST32, "a. 
3491 021032 012737 000340 177776 MOV #340,P :SET PRIORIiY TO 7 
3492 021040 052777 00040C 160344 BIS AMRESET, @TXCSR ;RESET THE DEVICE 
3493 021046 004737 005044 JSR PC, SMALL ;WAIT FOR RESET TO FINISH 
3494 021052 004537 007232 JSR RS, SETVEC ;SET UP THE VECTORS 
3495 021056 021336 4% sRECEIVER VECTOR 
3496 021060 007260 NO.BTRAP ; TRANSMITTER VECTOR 
3497 021062 34 340 -BYTE 340,340 sLEVEL 
3498 021064 052777 00400C 160320 BIS MSYSTST,@TXCSR [ENTER SYSTEM TEST MODE 
3499 021072 052777 000020 160304 BIS MRCVEN,QRXCSR ;TURN ON RECEIVER 
3500 021100 052777 000100 160276 BIS MRINTEN,ARXCSR ; TURN ON REC. DONE INT. ENABLE 
3501 021106 052777 001000 160274 BIS #CRCEN,@PARCSR ;TURN OFF CRC 
sees sate: 052777 000020 160270 1. BIS #SEND,aTXCSR ; TURN ON TRANSMITTER 
3504 021122 012737 000005 021152 MOV #5 ,68$ ;LOAD THE NUMBER 
3505 021130 032777 004000 160256 668: BIT MTIMER,Q@TXDBUF ;CHECK THE TIMER BIT 
3506 021136 001374 BNE 66$ 3;BR IF SET 
3507 021140 032777 004000 160246 67$: BIT MTIMER,@TXDBUF ;CHECK THE BIT 
3508 021146 001774 BEQ 67% ;BR IF CLEAR 
3509 021150 005327 DEC (PC)+ ;DECREMENT THE NUMBER 
3510 021152 000005 68$: 5 ;OF TIMES TO REPEAT 
3511 021154 001365 BNE 66% :BR IF MORE TO GO 
3512 021156 032777 000200 160226 BIT MIXDONE ,@TXCSR ;TEST TXDONE 
3513 021164 001001 BNE 2$ :BR IF SET 
3514 021166 104024 HLT 24 : TXDONE FAILED TO SET 
3515 021170 2$: 
3516 021170 012777 000400 160216 MOV #400,a1XDBUF ;LOAD TX BUFFER 
3517 021176 105777 160210 TS18 aTXCSR CHECK FOR 
3518 021202 100375 BP! 74 ; DONE 
3519 021204 005077 160204 CL” a1 XDBUF ;LOAD THE BUFFER 
3520 021210 105777 160176 TSTB i eee :AND CHECK 
3521 021214 100375 BPL :DONE AGAIN 
3522 021216 012777 001000 160170 MOV 11600, QTXDBUF ;LOAD TEOM 
352% 021224 012737 000144 021254 MOV #100.,73$ ;LOAD THE NUMBER 
3524 021232 032777 004000 160154 718: BIT W1IMER,QTXDBUF CHECK THE TIMER BIT 
3525 021240 001374 BNE 71$ :BR IF SET 
3526 021242 032777 004000 160144 728: BIT #IIMER,@TXDBUF CHECK THE BIT 
3527 021250 001774 BEQ 72% :BR IF CLEAR 
3528 021252 005327 DEC (PC)+ :DECREMENT THE NUMBER 
3529 021254 000144 73$: 100. OF TIMES TO REPEAT 
3530 021256 001365 BNE 71$ :BR IF MORE TO GO | 
J 
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621260 
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105777 
100401 


104400 


0 
52777 
052777 


012737 
052777 
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13:15 DUAL VECTORING=---RECEIVER BEFORE TRANSMITTER=--TEST 


160120 
000200 


000100 
177776 
004000 


004000 


001150 
000400 
005044 


000032 
021664 
000340 
000400 
005044 
007232 


340 
004120 
000400 
177776 


000005 
004000 


004000 


177776 
000005 
004000 


160114 


160102 
160072 
160062 


160042 


001226 
001216 
177776 
160004 


157760 
157754 


021474 
157734 


157724 


021540 
157670 


TSTB ORXCSR ;CHECK DONE 
BM] 5$ ;BR IF SET 
HLT 24 ;DONE FAILED TO SET 
5$: BIT MTIXDONE ,@TXCSR ;TEST TXDONE 
BNE 3$ ;BR IF SET 
HLI 24 ; TXDONE NOT SET SHOULD BE 
3$: BIS MTXINTE,@TXCSR ; TURN ON TRANSMITTER INT. ENABLE 
CLR PS ;LOWER PROCESSOR STATUS 
74%: BIT MTIMER,QTXDBUF ;CHECK THE TIMER BIT 
‘ BNE 74% ;BR IF SET 
75$: BIT MTIMER,@IXDBUF ;CHECK THE TIMER BIT 
BEQ 75% ;BR IF CLEAR 
HLT 27 ;DUP FAILED TO INTERRUPT 
4$: MOV #STACK,SP sRESET THE STACK 
BIS MMRESET,@TXCSR ;RESET THE DEVICE 
JSR PC,SMALL sWAIT FOR RESET TO FINISH 
SCOPE ;SCOPE THIS TEST 
pereererrrererrerereeereeee TEST 32 seeeeeeerereererererrereres 
s*TEST TO VERIFY THAT SERVICING THE 
:*TXDONeE BIT RE-ARMS THE INTERRUPT 
s*LOGIC IF INTERRUPT ENABLE IS SET. 
PI eeeeeetennertenereeereereeeeReeKeeeReeKeeereteKKeeNeeeeteeeere 
piteeweeeeeret 
> TEST BZ 
TTTITTTT Tite 
PPP PPPS PPPS CECE S ESOC EC CCOCE CESSES SSSISCCLCLOSLSCLOCLOCoSCOCLACCC CCL SET) 
1$132: MOV #32,a#TSTNO 
MOV #TST33,NEXT 
MOV #340,PS LOCK OUT INTERRUPTS 
BIS MMRESET @TXCSR “RESET THE DEVICE 
JSR PC, SMALL sWAIT FOR RESET TO FINISH 
JSR R5,SETVEC : INTERRUPT VECTOR SETUP 
NO.ATRAP sRECEIVER VECTOR 
4% : TRANSMITTER VECTOR 
BYTE 340,340 LEVEL 
BIS #SYSTST! SEND! IXINTE, QTXCSR ; TURN ON TRANSMITTER, CLOCK 
= AND INTERRUPTS 
BIS #TSOM,aTXDBUF LOAD START OF MSG 
CLR PS ;LOWER PROCESSOR STATUS 
MOV #5 ,68$ ;LOAD THE NUMBER 
660$: BIT MTIMER,@TXDBUF ;CHECK THE TIMER BIT 
BNE 66$ ;BR IF SET 
67$: BIT MTIMER,@TXDBUF ;CHECK THE BIT 
BEO 67% ;BR IF CLEAR 
DEC (PC)+ sDECREMENT THE NUMBER 
68$: 5 :OF TIMES TO REPEAT 
BNE 66% ;BR If MORE TO GO 
HLT 27 ;DUP FAILED TO INTERRUPT THE FURST TIME 
BR 3$ sLEAVE THE TES? 
1$: CLR PS sLOWER PROCESSOR STATUS 
MOV #5,73% ;LOAD THE NUMBER 
71$: Bl! MTIMER dIKOBUF CHECK THE TIMER 8]7 


— 


a a — a 


HH a 


CZDPCC MACYi1 30A(1052) 3 FEB-79 09: B PAGE 73 SEQ 0072 
CZDPCD.P11 O8-FEB-79 13:15 TXDONE BIT RE-ARM INTERRUPT TEST 

3587 021524 001374 BNE 71% ;BR IF SET 

3588 021526 032777 004000 157660 728: BIT MTIMER,@TXDBUF ; CHECK THE BIT 

3589 021534 001774 BEO 72% ;BR IF CLEAR 

3590 021536 005327 DEC (PC)* ;DECREMENT THE NUMBER 

3591 021540 000005 73$: 5 ;OF TIMES TO REPEAT 

3592 021542 001365 BNE 71$ ;BR 1F MORE TO GO 

3595 021544 1040¢7 HLT 27 ;DUP FAILED TO INTERRUPT AFTER SERVICING DONE 

3594 021546 000405 BR 3$ ; LEAVE 

3595 021550 2$: 

3596 021550 005077 157636 CLR aTXCSR ;SHUT DOWN THE DuP 

3597 021554 012716 021562 MOV #3$,(SP) bil TO END TEST 

3598 021560 000002 RTI ;RETUR 

3599 021562 012737 000340 177776 38: MOV #340,PS ; RAISE “PROCESSOR STATUS 

3600 021570 012706 001150 MOV #STACK,SP sRESET STACK 

3601 021574 104400 SCOPE :SCOPE THIS TEST 

3602 021576 032777 000200 157606 4$: BIT MTIXDONE ,ATXCSR ;CLEAR DONE AND RE~-ARM INTERRUPT 

3605 021604 005077 157604 CLR a1XDBUF ;LOAD BUFFER 

3604 021610 012737 000005 021640 MOV #5,78% ;LOAD THE NUMBER 

3605 021616 032777 004000 157570 768: BIT MTIMER,@TXDBUF ;CHECK THE TIMER BIT 

3606 021624 001574 BNE 76% ;BR IF SET 

3607 021626 032777 004000 157560 77$: BIT MTIMER,@TXDBUF ;CHECK THE BIT 

3608 021634 001774 BEQ 77% ;BR IF CLEAR 

3609 0621636 005327 DEC (PC)¢ :DECREMENT THE NUMBER 

3610 021640 000005 78%: 5 ;OF TIMES TO REPEAT 

3611 021642 001365 BNE 76% ;BR IF MORE TO GO 

3612 021644 012716 021504 MOV #1$, (SPF) ;SETUP TO FINISH TEST 

3415 021650 004537 007232 JSR RS, SETVEC sSETUP VECTORS FOR NEXT PART OF TEST 

3614 021654 007254 NO. ATRAP RECEIVER VECTOR 

3615 021656 021550 2$ ; TRANSMITTER VECTOR 

3616 021660 340 340 ~BYTE 340,340 sLEVEL 

3617 021662 000002 RT] , : RETURN 

3618 

2619 

3620 peerrererrererterereneerene TEST 53 seeeneeerereereerrenererrene 

3621 :*TEST TO VERIFY THAT SERVICING THE 

3622 7*RXDONE BIT  _-ARMS THE INTERRUPT 

367% ;*LOGIC IF INTERRUPT ENABLE IS SET. 

3624 pi teeerertereeeredetetereeeetereeeeee renter eTeereeKenereerettere 

3625 

3626 piteenenrerene 

3627 : ° 

3628 s test 55 

3629 : . 

3650 piteeeennerres 

3631 PIUMMAM RTA e RAK ee K AAT ere eK Tere eT ee TERE KET eK H AER HAH H Eee Eee er eeeTEe 

3632 021664 012737 000033 001226 15133: MOv -#33,a#TSTNO 

3633 021672 012737 022256 001216 MOV #15134, " weece 

3634 021700 012737 000340 177776 MOV #340,P LOCK OUT INTERRUPTS 

3635 021706 052777 000400 157476 BIS aMRESE! -@TXCSR RESE! THE DEVICE 

3636 021714 004737 005044 JSR PC, SMALL sWAILT FOR RESET TO FINISH 

3637 021720 052777 004000 157464 BIS #SVSTSTaTXCSR TENTER SYSTST MODE 

3638 021726 004537 007232 JSR R5,SETVEC ;SETUP VECTORS 

3639 021732 022174 4$ sRECEIVER VECTOR 

3640 021734 007260 NO.BIRAP > TRANSMITTER VECTOR 

3641 021736 340 340 -BYTE 340,340 


SLE VEL 
$642 021740 052777 000020 157436 BIS @RCOVEN, aRKCSR > TURN ON RECEIVER 


1 6 


CZDPCC MACY11 30A(1052) 47 FEB-79 09:33 PAGE 74 SEQ 0073 
CZDPCD.P11 OB-FEB-79 13:1 RXDONE BIT RE-ARM INTERRUPT TEST 
3643 021746 052777 000190 157430 BIS WRINTEN,@RXCSR ;TURN ON INT. ENA Te 
ee ste: 052777 000020 157430 * BIS WSEND ,@TXCSR ; TURN ON TRANSMITTER 
3646 021762 012737 000005 022012 MOV #5 68% :LOAD THE NUMBER 
3647 021770 032777 004000 157416 66$: BIT MTIMER, Q@TXDBUF ;CHECK THE TIMER BIT 
3648 021776 001374 BNE 66% sBR IF SET 
3649 022000 032777 004000 157406 678: BIT #TIMER,QTXDBUF ;CHECK THE BIT 
3650 022006 001774 BEQ 67% BR IF CLEAR 
3651 022010 005327 DEC (PCL)¢ :DECREMENT THE NUMBER 
3652 022012 000005 68$: 5 ;OF TIMES TO REPEAT 
3653 022014 001365 BNE 66% ;BR IF MORE TO GO 
3654 022016 032777 000200 157366 BIT MTXDONE ,AaTXCSR ;TEST TXDONE 
3655 022024 001001 BNE 2$ BR IF SET 
3656 022026 104024 HLT 24 > TXDONE FAILED TO SET 
3657 022030 005037 177776 2%: CLR PS ;LOWER PROCESSOR STATUS 
3658 022034 012777 000400 157352 MOV #400,aTXDBUF ;LOAD TX BUFFER 
3659 022042 105777 157344 TS1B aTXCSR 
3660 022046 100375 BPL 74 
3661 022050 005077 157340 CLR a1 XDBUF 
3662 022054 105777 157332 1STB atTxcsSR 
3663 022060 100375 ‘ BPL 74 
3664 022062 012777 001000 157324 MOV #1000,a1XDBUF 
3665 022070 7$: 
3666 022070 012737 000050 022120 MOV #40.,73% sLOAD THE NUMBER 
3667 022076 032777 004000 157310 71$: BIT MTIMER.ATXDBUF ;CHECK THE TIMER BIT 
3668 022194 001374 BNE 71% :BR IF SET 
3669 022106 032777 004000 157300 72$: BIT MTIMER,@TXDBUF ;CHECK THE BIT 
3670 022114 001774 BEQ 72% :BR IF CLEAR 
3671 022116 005327 DEC (PC)+ :DECREMENT THE NUMBER 
3672 022120 000050 73%: 40. 7OF TIMES TO REPEAT 
3673 022122 001365 BNE 71% ;BR IF MORE TO GO 
3674 022124 104022 HLT 22 sRECEIVER FAILED TO INTERRUPT 
2675 022126 000445 BR 6$ :GET OUT OF TEST 
3676 022130 005037 177776 3$: CLR PS sLOWER STATUS 
3677 022134 012737 000005 022164 MOV #5,78% ;LOAD THE NUMBER 
3678 022142 032777 004000 157244 768: BIT MTIMER,@TXDBUF ;CHECK THE TIMER BIT 
3679 022150 001374 BNE 76% :BR IF SET 
36080 022152 032777 004000 157234 77$: BIT #TIMER,QATXDBUF ;CHECK THE BIT 
3681 022160 001774 BEQ 77$ :BR IF CLEAR 
3682 022162 005327 DEC (PC)+ :DECREMENT THE NUMBER 
3683 022164 000005 78$: 5 ;OF TIMES 10 REPEAT 
3684 022166 001365 BNE 76% ;BR IF MORE TO GO 
36085 022170 104022 HLT 22 ;DUP FAILED TO INTERRUPT AFTER SERVICING DONE 
ey: 022172 000423 BR 6$ LEAVE IT 
6 
3688 022174 032777 000200 157202 4$: BIT MRXDONE ,ARXCSR ;SERVICE THE DONE BIT 
36089 022202 012716 022130 MOV #3$,(SP) sSETUP FOR 2ND PART OF TEST 
36090 022206 004537 007232 JSR R5,SETVEC ;SETUP NEW VECTORS 
3691 022212 022222 5$ sRECEIVER VECTOR 
3692 022214 007260 NO.BTRAP s TRANSMITTER VECTOR 
36093 022216 $40 340 BYTE 340, 340 LEVEL 
36094 022220 000002 RT] 3GO FINISH TEST 
36095 022222 S$: = 
3696 0222c2 052777 000400 157162 BIS MMRESET ,@TIXCSR ;RESET THE DEVICE 
36097 022230 004737 005044 JSR PC, SMALL sWAILT FOR RESET TO FINISH 
3098 022234 012716 022242 MOV #o$, (SP) :SETUP TO FINISH TES? 
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022240 


022254 


022256 


022506 


000002 
0 


104400 
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os tee 
0011 


000034 


007232 


340 
177776 
000120 
000020 
000005 
004000 


004000 


157000 
000400 
156762 


156756 
156750 


002000 
000113 
004000 


004000 


177776 


001226 
001216 
177776 
157104 


157072 


157040 
157040 
022402 
157026 


157016 


156770 


6$: 


RT] 
MOV 
MOV 
SCOPE 


seererreerreceerereereteees TEST 34 weereeterenerecerererereree 


d 6 
RXDONE BIT RE-ARM INTERRUPT TEST 


#340,PS 
#STACK,SP 


LEAVE 
sRAISE PROCESSOR STATUS 
RESET THE STACK 


> SCOPE THIS TEST 


*1EST TO PROVE AN INTERRUPT REQUEST 


res GENERATED WHEN AN ABORT IS RECEIVED. 


; eeeeeerererereerereeeerererereeeeseescceceeeeececereeeeeeeeecs 


-:@eneeerererese 


1 


66$: 
67$: 


71$: 
72$: 


73$: 


; TEST 34 


-s@eneenerereret 
- s@erreeeereeeteeetereeeeeteee eee eee eee eee eee eee teeter neteeteeeeese 


$134: 


MOV 


#34 ,a#TSTNO 
tie of NEXT 
#340,P 

WMRESET, aTXCSR 
PC, SMALL 

#SYSTST caTXCSR 
RS,SETVEC 


340, 340 
PS 


MRCVEN!RINTEN, ORXCSR 


#SEND ,@TXCSR 
#5 ,68$ 

TIMER ,aTXDBUF 
66$ 
#TIMER,aTXDBUF 
67% 

(PC)+ 


66% 
aTXCSR 
1$ 


24 
#1SOM,aTXDBUF 
aTXCSR 
74 
a1 XDBUF 
aTXCSR 

“4 
HTABORT, a1 XDBUF 
#75, ,73$ 
#T1MER, aT XDBUF 
71$ 


#TIMER,dTXDBUF 
72% 
(PC)+ 


71$ 
22 


s;LOCK OUT INTERRUPTS 
RESET THE DEVICE 

;WAIT FOR RESET TO FINISH 
sENTER SYS TST MODE 

;SET UP VECTORS 
RECEIVER 


:BR 


; TRANSMITTER 
sLEVEL 
;LOWER PROCESSOR STATUS 
; TURN ON RECEIVER AND INTERRUPT ENABLE 
; TURN ON TRANSMITTFR 
;LOAD THE NUMBER 
;CHECK THE TIMER BIT 
BR IF SET 

;CHECK THE BIT 

;BR IF CLEAR 
:DECREMENT THE NUMBER 
:OF TIMES TO REPEAT 
;BR IF MORE TO GO 
TEST DONE 

IF SET 

:DONE FAILED TO SET 
;LOAD TX BUFFER 

; CHECK FOR DONE 

;BR IF NOT SET 

;PUSH OUT A CHARACTER 


;WAIT FOR DONE 
;BR IF NOT SET 
SET ABORT 


;LOAD THE NUMBER 


i CHECK THE TIMER B11 


IF SET 


CHECK THE BIT 
:BR IF CLEAR 


:DECREMENT THE NUMBER 


:OF TIMES TO REPEAT 


IF MO 0 GO 
RECEIVER FAILED TO INTERRUPT 


RE 10 


;ON AN ABORTED MESSAGE 


SEQ 0074 


CZDPCC 


MACY11 350A(1052) 


CZDPCD.P11 


022536 
022544 


022756 


08-F EB-79 


012737 


104400 


013737 


K 6 
a0 FEB-79 09:33 PAGE 76 SEQ 0075 
13:15 ABORT iNTERRUPT TEST 
000340 177776 2$: MOV #340,PS :SET STATUS TO 7 
001150 MOV MSTACK,SP RESET THE STACK 
000400 156662 BIS WMRESET,@TACSR “RESET THE DEVICE 
005044 JSR PC, SMALL WA IT FOR RESET TO FINISH 
SCOPE 
,ttrererererereererrrrrrttt TEST 35 f@enrrrreaneceranenenttetertertenreee 
:*THIS TEST IS AN AID FOR DEBUGGING CRC 
;*ERRORS. A CHARACTER IS LOADED INTO THE 
:*DUP AND PUSHED OUT BIT BY BIT WHILE 
;tALLOWING THE OPERATOR TO MONITOR THE CRC 
> *CHARACTER AS IT IS GENERATED. THE DATA CHARACTER 
;*CAN ALSO BE CHANGED BY THE OPERATOR. 
:*PUT SWO9=1 TO LOCK ON BITS. TO CONTINUE HIT 
;tANY KEY ON THE TTY. AFTER 16 TIMES PUT DOWN SWO9 TO LEAVE 
sNOTE: REMEMBER--IN SDLC A ONE IS A LOGIC LOW IN THE 
;CRC GENERATOR. 
pi teretrereretereeeeteereeeeeeeeeee eee eteneeeeeeteteterte 
p;iteeerererene 
s TES) 3 
i eeeeneeerers 
pi: eeeeeeeeee eee eee eee eee eee eee ete eee tee 
000035 001226 18135: Mov #35 ,a#TSTNO 
002764 001216 MOV # EOP NEXT 
000400 156632 BIS MMRESET,@TXCSR ;RESET THE DEVICE 
005044 JSR PC, SMALL sWALT FOR RESET TO FINISH 
102010 014534 MOV WCRC. CCITT, XPOLY LOAD THE POLYNOMIAL 
000125 022740 MOV #125,3% ;LOAD DATA TO SOFTWARE BCC-CHANGE CHARACTER HERE 
27602 001252 MOV 38. SAVRI 
177777 014540 MOV #-i, CALBCC ;CLEAR FOR SOFTWARE BCC 
014540 022742 MOV CALBCC,4$ 
001242 CLR TEMPS 
001244 CLR TEMP4 ;CLEAR BIT COUNTER 
001246 CLR TEMPS 
156552 CLR a TXDBUF s;RESET TXDONE 
014000 156542 BIS #MMODE ,ATXCSR sENTER MAINT MODE-PROGRAM CLOCKING 
000020 156526 BIS MRCVEN,ARXCSR ;TURN ON RECEIVER 
000020 156526 BIS #SEND,@TXCSR ; TURN ON TRANSMITTER 
000400 156522 MOV #TSOM,ATXDBUF ; 
000044 PKCLK , 36. ;PUSH OUT 2 
022740 56510 MOV 3$,aTXDBUF ;LOAD DATA 
000020 PKCLK 16. :PUSH OUT ANOTHER 
000002 1$: PKCLK * ;PUSH OUT A BIT 
001244 001254 MOV TEMPS ,SAVR2 sSET UP TO TYPE 
001242 INC TEMP3 
001244 INC TEMP4 ;UPDATE BIT COUNTER 
014362 2$: - RS,SIMBCC St: tl SOFTWARE 8CC BASED ON THESE PARAMETERS 
:SH 
3$: -WORD 0 DATA 
4$: -WORD 0 ;PREVIOUS BCC 
023042 JSR PC,5$ sCHECK TO SEE IF WE SHOULD WAIT FOR SCOPING 
CLC sCLEAR FOR NEXT ROTATE 
022740 RORB 3$ sSET UP THE NEXT BIT 
014540 022742 MOV CALBCC,4% sFOR THE SOFTWARE BCC 


CZDPCC MACY11 30A(1052) 26-FEB-79 09:33 PAGE 77 SEQ 0076 
CZDPCD.P11 O8-FEB-79 13:15 CRC DEBUGGING AID TEST 

3811 022764 022737 000006 001244 CMP #6, TEMPS 

3812 022772 001002 BNE -*6 

3813 022774 005077 156414 CLR a1 XDBUF 

3814 023000 022737 000014 001242 CMP #12., TEMPS 

3815 023006 001003 BNE 12$ 

3816 023010 012777 001000 156376 MOV #TEOM,aTXDBUF 

3817 023016 022757 000020 001244 12%: CMP #16., TEMPS ALL DONE WITH THE CHARACTER? 

3818 ; INCREASE THE COMPARE NUMBER TO OUTPUT 

3819 CRC TO THE RECEIVER 

3820 023024 001331 BNE 1$ ;BR IF MORE TO GO 

3821 023026 052777 000400 156356 BIS WMRESET,@TXCSR ;RESET THE DEVICE 

3822 023034 004737 005044 JSR PC, SMALL sWAIT FOR RESET TC FINISH 

aah 023040 104400 SCOPE ;SCOPE THIS TEST 

3825 023042 032777 001000 156132 S$: BIT #SWO9 ,aSWR ;SwO9=1? 

3826 023050 001432 BEQ 6$ ;BR IF NO 

3827 023052 013704 014540 MOV CALBCC ,R4 ; THE DATA CHARACTER IS ALWAYS 

3828 023056 012737 000001 001256 MOV #1, SAVR3 sFOLLOWED BY A ZERO CHARACTER.TTHE 

3829 023064 000241 CLC :DATA BIT IN CRC SHOWS WHICH BIT OF 

3830 023066 006004 118: ROR RG ; THE TWO CHARACTERS IS BEING GENERATED. 

3831 023070 006137 001256 ROL SAVR3 

3832 023074 103374 BCC 11% 

3833 0623076 105737 001246 TSTB TEMPS 

3834 023102 001006 BNE 10$ 

3835 023104 104402 023601 TYPE oEM17 7 TYPE MSG 

3836 025119 104402 0236306 TYPE .MH1 ; TYPE HEADER 

3837 023114 105137 001246 COMB TEMPS 

3838 023120 104410 10$: CONVRT 

3839 023122 024476 DT1 

3840 023124 105777 156054 7$: TSTB aTKCSR CHECK TTY DONE=-GO SCOPE THE CRC GENERATOR 

3841 :NOTE: THE LSB IS RIGHT JUSTIFIED ON THE TTY OUTPUT::! 

3842 023130 100375 BPL 7$ ;BR IF NOT YET 

7843 023132 017701 156050 MOV AdTKDBR,R1 READ THE BUFFER 

re 023156 000207 6$: RTS PC ; RETURN 

4 








y 
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CZDPCD.P11 O8-FEB-79 13:15 CRC DEBUGGING AID TEST 
3847 023140 051377 047505 020115 EMI: -ASCIZ <377>/REOM BIT / 

(1) 023155 377 054122 047504 EM2: ~ASCIZ <377>/RXDONE BIT / 

1) 023170 051377 040530 047502 €EM3: ASCIZ <377>/RXABORT BIT / 

1) 023206 051377 040530 052103 EmM4: . ASCIZ <377>/RXACTIVE BIT / 

1) 023225 377 054122 042504 EMS:- ASCIZ <377>/RXDERR BIT / 

1) 023242 051377 043505 051511 EMé: ASCIZ <377>/REGISTER ERROR / 

1) 023263 377 054122 042504 EM7: ASCIZ <377>/RXDERR OR OVERRUN / 
023307 377 053117 051105 EMI0: ASCIZ <377>/OVERRUN BIT / 
023325 377 040504 040524 EM11: ASCIZ <377>/DATA COMPARE ERROR / 
023352 042377 052101 0620101 EMI2 ASCIZ <377>/DATA COMPARE ERROR IN SECONDARY MODE / 
023421 377 051103 020103 Em13 ASCIZ <377>/CRC CALCULATION ERROR / 
023451 377 051522 946517 EMI4 ASCIZ <377>/RSOM BIT / 
023464 040506 046111 042105 DH1 ASCIZ /FAILED TO CLEAR / 
023505 044501 042514 DH2 ASCIZ /FAILED TO SET / 
023524 052777 042516 050130 D3 ASCIZ <377>/UNEXPECTED / 
023541 054105 042520 6 ASCIZ <377>/EXPECTED F OUND REGISTER / 
023601 051103 020103 EMI7 ASCIZ <377>/CRC GENERATCR STATUS / 
023630 042377 052101 020101 MH! ASCIZ <377>/DATA CHAR DATA BIT IN CRC GEN. CRC FOR THIS BIT / 
023723 052012 040522 EMI5 ASCIZ <15><12>/TRANSMITTER / 
023743 051012 041505 EMI16 ASCIZ <15><12>/RECEIVER / 
023760 047504 042516 041040 €EM23 ASCIZ /DONE BIT / 
023773 044501 042514 EM22 ASCIZ /FAILED TO SET / 
024012 052777 042516 050130 €EM20 ASCIZ <377>/UNEXPECTED RECEIVER INTERRUPT / 
024053 047125 054105 €EM21 ASCIZ <377>/UNEXPECTED TRANSMITTER INTERRUPT / 
024117 040 051522 046517 EM24 ASCIZ / RSOM BIT / 
024133 106 044501 042514 DH4: ~ASCIZ /FAILED TO INTERUPT. / 
024160 047111 042524 052522 DHS: eASCIZ /INTERUPTED UNEXPECTEDLY./ 
024211 040 042523 020124 DH?7: -ASCIZ / SET PREMATURELY / 


024234 ~ERRTAB: 

024234 000000 0 

024236 0060000 0 

024240 000000 0 

024242 023140 EM] 

024244 023505 DH2 sHALT 1 
024246 000000 0 

024250 023153 EM2 

024252 023505 DH2 sHALT 2 
024254 000000 = 

024256 023242 EM6 

024260 023541 DH6 sHALT 3 
024262 024514 DI6 

024264 023140 —EM1 

024266 023464 DK! sHALT 4 
024270 000000 0 

024272 023170 EM3 

024274 023505 DH2 HALT 5 
024276 000000 0 


Bee ee ee Oe ee 8 Ee Fe 8 SS 8 8 8 OR OO SO PO ON FR PRE FR GA CU PEPE Ge Ch ME FA PES Mi EH FA Pa ok ee He i He Mean 
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CZDPCD.P11 OB-FEB=-79 13:15 CRC DEBUGGING AID TEST 

(1) 024300 023206 EM4 
(1) 024302 023464 DH1 sHALT) 06 
H. 024304 900000 0 

) 
(1) 024306 023225 CMS 
(1) 024310 023505 DHZ sHALT 7 
HH 024312 000069 0 
(1) 024316 023325 re EM11 
(1) 024316 000000 0 sHALT 10 
a 024320 000000 0 
( 
(1) 024322 023170 EM3 
(1) 024324 023464 DH1 sHALT 11 
by 024326 000000 0 
(1) 024330 023352 EM12 
(1) 024332 000000 0 sHALT 12 
+ 024334 000000 0 
(1) 024336 023263 EM7 
(1) 024340 023505 DH2 HALT 13 
a 024342 000000 0 
(1) 
(1) 024344 023206 EM4 
(1) 024346 023505 DH2 sHAL? 14 
+ 024350 000000 0 
(1) 024352 023307 —M10 
(1) 024354 023464 DH1 sHALT 15 
3h 024356 000000 0 
( 
(1) 024360 023524 DH3 
(1) 024362 023242 EM6 sHALT 16 
34 024364 060000 0 
(1) 
(1) 024366 023421 —M13 
(1) 024370 000000 0 sHALT 17 
te 024372 000000 0 
( le 
(1) 026374 023451 EM14 " 
(1) 024376 023464 DH1 sHALT 20 
+ 024400 000000 0 - 
(1) 
(1) 024402 023451 EM14 
(1) 024404 023505 DH2 HALT 21 
3. 024406 000000 0 ’ 
(1) 
(1) °026410 025743 EM16 
(1) 026612 024133 DHS sMALT 22 
Hf 024414 000000 0 
(1) 
(1) 024416 023743 EM16 
(1) 024420 024160 DHS sWALT 23 
HH 024422 000000 0 
( ) 


CJDPCO MACYT1 3500101052) 26-FEB-79 09:33 Pace B80 SES 0079 
C7JOPCD P11 OB-FEB-79 13:15 CRC DEBUGGING AID TEST 

(1) 026626 023760 M23 
(1) 0264626 023773 EM22 SMALT 246 
+h 024430 900000 0 
(1) 
(1) 026632 024012 £M20 
(1) 024434 000000 0 sMALT 25 
th 024436 000009 0 
(1) 
(1) 026440 026053 —M21 
(1) 024442 000000 0 SHALT 26 
HL. 024444 000000 0 

) 
(1) 0264466 023723 —EM15 
(1) 0246450 024133 DHS HALT 27 
+h 024452 000090 9 
( 
(1) 624454 023140 EM 
(1) 024456 023464 DH1 
if 024460 000000 0 ZHALT 30 
(1) 
(1) 026462 023153 EM2 
(1) 024464 023464 DH1 
A. 624466 000000 0 HALT 31 
(1) 
(1) 024470 024117 EM24 
(1) 024472 023464 DH1 
1b 024474 000000 0 sHALT 32 
(1) 
(1) 024476 000003 DT1: 3 
(1) 024500 006 021 -BYTE 6,17. 
(1) 024502 001252 SAVR1 
(1) 024504 006 017 -BYTE 6,15. 
(1) 024506 001254 SAVR2 
(1) 024510 006 002 -BYTE 6,2 
th 024512 0061256 SAVR3 
(1) 
(1) 024514 000003 DT6: 3 
(1) 024516 006 004 -BYTE 6,4 
(1) 024520 001262 SAVRS 
(1) 024522 006 002 -BYTE 6,2 
(1) 024524 001260 SAVR4 
(1) 024526 006 002 -BYTE 6,2 
(1) 024530 001256 SAVR3 
(1) 024532 CORMAX : 

000001 END 


. #7 

CZDPCC MACY) werdad y 4 £1 -FEB-79 09:33 PAGE 82 

CZDPCD.P11 OB-FEB-79 13:15 CROSS REFERENCE TABLE == USER SYMBOLS 

ADROENT= 003735 1275* 1311* 13208 

BCCFBK 014536 2669" 2655 2658" 2661 2665 20778 

BINWRD 004240 1362* 1363 14004 

Bllw = 002000 7S2a 1708 1711 1721 1723 1728 1737 1742 1969 
2043 2091 2097 2102 2116 2123 2128 2163 2208 

BITO0 = 000001 6144 734 2653 

B1T1 = 000002 6134 733 

B11T10 = 002000 6044 724 739 752 772 

B1711 = 004000 6034 723 751 771 

BiT12 = 010000 6024 722 738 745 750 770 

B1113 = 020000 6014 721 749 769 

B1114 = 040000 6004 720 737 748 768 1034 1182 

B1115 = 100000 5994 719 736 743 747 767 1031 3326 

BIT2 = 000004 6124 732 1120 

B1T3 = 000010 6114 731 758 

B1T4 = 000020 6104 730 757 

BITS = 000040 6094 729 

B116 = 000100 6084 728 756 

B11? = 000200 6074 727 755 

BI1T8 = 000400 6064 726 741 754 774 

B1T9 = 001000 6054 725 740 744 753 773 

BRW 003306 1126 12044 

BRX 603310 1127 12054 

CALBCC 014540 2583* 2584 2622* 2623 2671* 26788 3786" 3787 3810 

CARDET= 010000 7224 §©=2906 3126 

CHRCNT 004236 1360* 1364 1380« 13988 1399 

CLK = 020000 7494 #81530 1533 

CLK.A 001433 8604 1646 

CLRVEC 005104 15554 

CNVRT = 104411 8278 1143 1145 1147 1149 1473 1475 

CONVRT= 104410 8254 1079 1489 3838 

CORMAX 024532 38474 . 

CRCEN = 001000 7448 1810 1877 1961 2019 2082 2155 2199 2263 
2520 2559 2704 3501 

CRCERR= 010000 7384 

CRC.CC= 102010 2582 26804 3783 

CRC16 - 120001 26794 

CREAM 001316 7144 9418 1600* 1601 1605* 1608 1609* 1610 1613* 

C1™S = 020000 721# 2906 3126 

CYCLE 006224 1128 1163 1164 1590" 

DATA 001324 7818 1691 1709* 1819* 1838* 1894* 1912* 1926* 1966* 
2160* 2166" 22058 2211* 22208 2223 2229 2268 22748 
ath ly 0422% 2425 2428% 2475 2476 2486" 2487 25818 
6 

DATABP 004612 1462* 1465 1487 14908 

DATAHD 004600 1461* 1483 14864 

DECMOD= 100000 7434 

DEVADR 003732 1273* 1308 13184 

DH1 023464 38474 

DH2 023505 38474 

DH3 023524 38474 

DHS 024133 3847 

DH5 024160 3847# 

oa 023541 3847# 

47 024211 3847 
+e 001200 6584" 9548 11408 


1975 
2226 


3827 


2315 


2026* 
23208 
2608* 


1980 
2271 


2364 


2088* 
23268 
2609 


2029 
2525 


2405 


21108 
23098 
26168 


SEQ 0080 
2038 


2459 


2113¢ 
23720 
2621* 


26-FEB-79 09:33 PAGE 


CZDPCC MACY11 30A(1052) 83 
CROSS REFERENCE TABLE == USER SYMBOLS 


O8-FEB-79 13:15 


d 7 


3101 3126 3142 3314 


1102 1590 1595 


1749* 
1610 


1058 1062 1076 1603 1613 


——- 


SEQ 0081 


yee 


enero NS 
. 
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CZOPCD.P11 OB-FEB-79 13:15 CROSS REFERENCE TABLE -- USER SYMBOLS 

Em3 023170 3847" 

EMG 023206 38478 

EMS 023225 3847" 

EM6 023242 384/78 

—M7 023263 38478 

ERRCNT 001232 679" 943" 1176 1$12¢ 

ERRFLG 001341 7948 939" 1138 1196* 16450* 16463 1477* 

ERRMSG 064566 1460* 1478 14818 

ERTABO 004772 1475 15214 

EXIT = 000000 6154 

EXITER 004726 1495 1512¢ 

FIX.00 006742 1647 16814 

FLAG 001332 7848 972* 1085 1088+ 

HALTS 004616 1446 1492¢ 

HDXEN = 000010 7588 

HILIM 003730 1272* 1299 1317# 

HUPPSR 001420 8484 1626* 1627 

HUPRBF 001422 B49" 1624" 1625" 1626 

HUPRCR 001424 850# 1618" 1619" 1620 

HUPTBF 001426 8518 1633* 16348 

HUPTCR 001430 852 1629* 1630" 1631 

ICOUNT 001222 675#@ 119% 1199 

INBUF 606160 1242 1278 1409* 1410 1414 1577# 

INIFLG 001340 7930 958 964« 973 

INSTER= 104404 817" 1293 1419 

INSTR = 104403 8158 978 986 994 1003 1011 1015 1021 1025 1653 

INSTR2 003530 1249 12614 

JUMPER 007264 1767@ 

LIMITS 003656 1288 1299" 

LOBITS 003734 1274" 1303 1319# 1320 

LOCK 001220 674# 1198* 1212 1214 1469 2516" 2762" 2799 2815" 2868" 2905" 2921" 2974e 
3015* 3031" 3084* 3125* 3141" 3282" 33068 

LOKFLG 001342 795@ 

LOLIM 003726 1271* 1301 135164 

LPCNT 001224 676# 1193" 1194 1197* 

LSTERR 001234 6804 944* 1157 1180" 1447 1449 

L00.00 001434 8628 1616" 1644 

MASK.A 001432 8584 1645 

MASTEK 005411 1471 15664 

MCRLF 005136 1227 1351 1467 1468 1476 1566# 1652 1669 

MCSR 005473 979 15664 

MCSRX 005341 1142 15668 

MDATA 006116 1378 1388 1575@ 

MEPASS 005157 1141 15664 

MERRPL 005466 1474 15664 

MERRX 005366 1148 15668 

MERR2 005205 1566# 1592 

MERR3 005254 1098 15668 

MEXT = 010000 7o2# ©1502 2776 2829 2880 2935 2990 3045 3100 3155 3286 

MH 1 023630 3836 38478 

MIND 001330 7B3@ = 1694" =: 1695 16097« 

MJMPR 005525 1012 15664 

MOCK 005312 1122 15668 

MMODE = 014000 761# 1812 1880 1963 2021 2085 2157 2202 2265 2317 2366 2408 246!) 
2592 2703 3792 

MMODEA= 004000 7518 


' # 


CZDPCC =MACY11 30A(1052) 26-FEB-79 09:33 PAGE 85 SEQ 0082 

CZDPCO.P11 O8-FEB-79 13:15 CROSS REFERENCE TABLE == USER SYMBOLS 

MMODEB= 010000 750" 

MNE WW 005413 1093 15668 

MPAR 005702 995 15668 

MPASSK 005355 1146 15664 

MPOWER 005141 1551 1566 

MOM 005132 1259 1566# 1675 

MR 005202 1129 1506# 1670 

MRESET= 000400 6154 754#@ 1807 1874 1958 2016 2079 2153 2197 2261 2313 2361 2402 
2454 2491 2522 2553 2590 2697 2770 2827 2876 2933 2986 3043 3096 
3135 the 3226 3284 3348 3408 3492 3545 3564 3635 3696 3717 3757 

MSRJM 005761 1026 1566 

MSTJM 005726 1022 1566 

MTCN 005600 1016 1566# 

MIDATA= 040000 7484 2713 2717 2722 2729 

MTITLE 001000 6534 963 

MIOTAL 005647 1004 1566# 

MISTN 005377 1472 1566# 1654 

MISTPC 005300 1566# 

MVEC 005512 987 15664 

MVECX 005347 1144 15664 

NEXT 001216 673# 1200 1517 1806" 1873" 1957 2015" 2078* 2152" 2196 2260" 23128 2360¢ 
2401" 2453% 2515" 2576 2696 2761" 2867* 2973 3083" 3190* 322468 32788 3346¢ 
3406" 3490" 3562 3633* 3715* 3780+ 

NO.ATR 007254 1753@ ©3197 3229 3254 3567 3614 

NO.BTR 007260 1757# 3289 3309 3353 3413 3467 3496 3640 3692 3722 

OJUMPE 007332 17834 2767 2873 2983 3093 

OPCLRY 001323 780# 1014 1029 1073* 1770 1776 | 

OvRRUN= 040000 737" =. 2376 2377 2414 2432 2433 

PARAM = 104405 8198 980 988 996 1005 1655 

PARAM] 003576 1277# 1294 

PARBIT= 000000 6154 

PARCSR 001410 044 =1623* 1810" 1877* 1879% 1961* 2019 2082 2084" 21558 2199" 22018 226% 

/ 2315" 2364% 2405 2407" 24659 2524 2560" 2704" 3501+ 

PARERR 003652 1280 1282 1284 1293" 1300 1302 1304 

PASCNT 001230 6788 938* 1139" 1140 1173 

PERFOR= 000000 6154 

PKCLK = 104412 829H 1713 1722 1724 1729 1738 1743 1915 1929 1970 1976 1981 2030 
2039 2044 2092 2098 2103 2117 2126 2129 2164 2209 2227 2272 2324 
2465 2468 2471 2482 2596 2602 2604 2612 2617 2768 2712 2716 2721 

POPRO = 012600 593@ «1511 

POPISP= 005726 591# 

POP2SP= 022626 595# 1202 

PRIRTY 001320 778@ 1002" 1066 

PRISEC= 010000 745# 1879 2084 2201 2407 2520 2559 

PS = 177776 5844 934* 1116" 3193* 3201* 3225" 32342 32408 «= 3247" «= 3.283" «82918 53188 88K 76 
3355*@ 3407" 3637" «345462 «= 345Be «=F Te «= 35 3Be «= 85632 85788 | 85 R4e | 8599") =e 8H S78 
3676" 3700" 3716" 37242 3755+ 

PUSHRO= 010046 5924 1496 

PUSHIS= 005746 590M 

PUSH2S= 024646 594e | 

PWRUP 005060 1545 1547 

OV.FLG 001343 7968 940* 1152¢ 1191 

KABORT= 002000 739#@ = 2171 2214 2234 2279 2285 2331 2340 

RO(RCIN= 040000 768" 
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CZDPCD.P11 O8-FEB-79 13:15 CROSS REFERENCE TABLE == USER SYMBOLS 

RCRC7T= 100000 7678 

RCVEN = 000020 7308 = =61811 1878 1960 2018 2081 2156 
2462 2525 2593 2706 3356 3415 3499 

RECACT= 004000 7238 =—1815 1835 1855 1883 1897 1899 

REOM = 001000 7408 1983 1993 2046 2056 2104 2131 

RESREG 004614 1488 14918 . 

RESTRT 003116 1151 1155 11638 

RESOS = 104407 8234 1491 

RETURN 001214 6728 946* 1128* 1130 1163* 1200" 1203 

RFLG 007060 17198 = §=1813 1881 1964 1990 2022 2053 
2318 2367 2409 2420 

RING = 040000 720# 2797 2800 2903 3013 3123 3126 

RINTEN= 000100 7288 = 3357 3416 3500 3643 3725 

RPOKE 007020 1708# = =§=1715 1821 1840 1896 1914 1928 
2168 2207 2213 2222 2225 2251 2270 
2424 2427 2430 

RSOM = 000400 7418 1827 1829 1846 1848 1909 1923 

RTS = 000004 7328 =©2881 2906 2922 3101 3126 3142 

PUN 001314 712a 942* 1595 1598* 1599* 1606" 1607* 

RXCSR = =—001404 8428 1167 1614* 1618 1809 1834 1854 
2018* 2031 2045 2055 2081" 2093 2118 
2277 2282" 2283 2316* 2329 2335 2363 
2542 2593" 2605 2613 2618 2706* 2735 
3092* 3098 3292" 3293 3305* 3312" 33148 
3416* 3455 3459* 3499" 3500" 3531 3642+ 

RXDBUF 001406 843H 1620" 1621* 1622 1623 1624 827 


RXDERR= 100000 7364 = =62180 2243 2294 2343 2376 2377 

RXDONE= 000200 7278 1822 1824 1841 1843 1890 1902 
ie 1996 2031 2049 2059 2093 2118 
6 

SAVACT 001312 710# 1035* 1041* 1043 1044 1070* 1096 

SAVNUM 001313 7114 937« 1037* 1071* 1150* 1153* 

SAVPC 00126¢ 6974 1325* 1523 

SAVPCA 001306 706 

SAVRO 001250 6904 13348 1339 

SAVROA 001270 6994 

SAVR1 001252 691" 1333* 1340 3785* 3847 

SAVRIA 001272 7004 

SAVR2 001254 6924 1332« 1341 5800+ 3847 

SAVR2A 001274 7014 

SAVR3 001256 6934 1331* 1342 3828 3831« 3847 

SAVR3A 001276 7024 

SAVRG 001260 6944 1330« 1343 3847 

SAVR4A 001300 7034 

SAVRS 001262 6954 13298 1344 3847 

SAVRSA ° 001302 7044 

SAVSP = 001264 696" 

SAVSPA 001304 705a@ 

SAVOS = 106406 8214 1451 

SCOPE = 194400 8094 1858 1943 2000 2063 2138 2183 
2562 2633 2743 2845 2951 3061 3371 
3001 3702 3759 3825 

S(OP1 = 104401 Bll# 2552 2788 2814 2843 2894 2920 


SEQ 0084 
2200 2264 2282 2316 2365 2406 
3642 3725 3793 
1940 2174 2237 2288 2381 2437 
1517* 1519 1552 1668* 1678" 1679 
2086 2108 2158 2203 2218 2266 
1968 2028 2090 2112 2115 2162 
2276 2322 2328 2371 2374 2413 
1955 2546 
3293 


3326 3330" 3356" 33572 3389* 3415¢ 


1846 1849 1909 1923 1935 
2104 2122 2131 2165 2170 2210 
2330 2334 2356 2375 2414 2431 
3460* 
2432 


932 1971 
33? 3455 


2247 2299 2347 2385 2440) 2493 
3209 3250 3332 339) 3462 354? 


2949 3004 3050 3089 3114 $14) 


NS SSS SSS eee 


Ce SS SSS sss lS SSS 
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SEND = 000020 7S7#@ = 2463 2526 2594 2705 3358 3417 3502 3570 3644 3726 3794 

SETFLG= 1064613 B51" 1013 1017 1023 1027 

SETVEC 007232 Ube the 3228 3253 3287 3307 3351 3411 3465 3494 3566 3613 3638 

SFLG 007152 1735@ «= 2024 

SHIFTS 001326 7828 1690* 1698« 17148 1820* 1839¢ 1895¢ 19138 1927* 1967* 20278 2089e 21118 
21148 21618 21678 22068 2212e 2221e 2224 22508 2269* 2275 2321¢ 23278 2370¢ 
2373* 24128 24238 24268 24298 

SIMBCC 0146562 2586 26434 3803 

SMALL 005044 15408 1808 1875 1959 2017 2080 2154 2198 2262 2314 2362 2403 2455 
2492 2523 2554 2591 2698 2771 2828 2877 2934 2987 3044 3097 3154 
ae 3227 3285 3349 3409 3493 3546 3565 3636 3697 3718 3758 3782 
3 

SPACNT= 004237 1361* 1382 1385* 13998 

SRD = 002000 7248 3016 3126 

SRIMFL 001336 7864 1028 2980 3090 

STACK = 001150 585a 935 1117 1518 1548 3191 3207 3249 3304 3331 3388 3461 3544 
3600 3701 3756 

S1D) == 000010 731#@ 8 2991 3016 3032 3101 2126 3142 

STIMFL 001334 785a 1024 2978 3088 

STPSYN= 000400 7268 

STUFCK 606746 160904 

$v05 003744 13298 

SWR 001202 6594 951 953" 965 . 969 1083 1091 1096 1101 1120 1182 1189 1210 
1223 1440 1445 1494 1513 1515 1650 3825 

SWREG 000176 6474 953 

SswOO = 000001 56604 969 1083 

SwO1 = 000002 565a 1650 

SwO2 = 000004 5044 

SwO3 = 000010 5628 1091 

SWO4 == 000020 5ola 

SWCS = 000040 5004 

$w06 = 000100 559" 

SwO7 = 000200 5588 

$w08 = 000400 557 1513 

$wO9 - 061000 556 1210 3825 

Sw10 = 002000 555a 1515 

Sw11 = 004000 554 1189 

Sw12 = 010000 5534 1223 1440 

SW13 > = 020000 5528 1445 

SwW14 = 040000 551 

Sw15 = 100000 550# 

SYSTST= 004000 7634 1502 2526 3200 3232 3350 3410 3498 3570 3637 3719 

TABORT= 002000 7720 3744 

TBLA 013516 2456 2457 24964 

TBLB 014350 2577 2579 2580 26364 

TCNFLG 001322 7794 1018 1019 1032 1072* 1768 1784 2763 2869 2975 3085 3279 

TCRCIN= 010000 770# 

TCRC7T= 020000 769" 

TEMP 006054 1365 1573@ 8 20348 2035 

TEMP) 001236 6854 1008 1036 1037 1038* 1076« 1077 1081¢ 1568 1962* 1977* 1978 2020¢ 
2040" 2041 2083« 20998 2100 212\e 21258 2126 21698 2174 2177 2277e 22R3e 
2288 2291 23298 23358 2337 25188 25208 2524 25578 25598 2560 26468 2669" 

‘ 20998 27098 2710 33ile 
TEMP2 = =0012466 6864 999 1002 1043« 1046* 1050¢ 1077« 1570 1982* 1986 1992° 1996 2046Se 
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2049 2055* 2059 2130" 2134 2232* 2237 2240 2519¢ 2532 2558* 2647¢ 26518 


TEMPS §=001242 6878 2648" 2650 2660* 2662 2667* 2668" 2671 2701* 2738" 2739 3788* §«3801e 


TEMPS 001244 6888 1719" 1730" 1735" 1744* 3789* 3800 3802* 3811 3817 

TEMPS 001246 6898 1720" 1725" 1726 1736* 1739" 1740 3790* 3833 3837« 

TEOM = 001000 7738 = 2603 2707 2733 3436 3816 

TIMER = 004000 771\# 2536 2538 2777 2779 2790 2792 2803 2805 2818 2820 2831 2833 
2883 2885 2896 2898 2909 2911 2924 2926 293; 2939 2993 2995 3006 
3008 3019 3021 3034 3036 3047 3049 3103 3105 3116 3118 3129 3131 


3748 
TXCSR 001204 6648 1185 12% 3840 
TKDBR 001206 6654 1187 1246 1252 3843 
TLAST = 022536 1673 38478 
TPCSR 001210 6664 1228 1250 4442 
TPDBR 001212 6674 1230« 1252" 1444 
TRPOK 04330 14314 
TRP.PC 006222 1579@ 
TSOM = 000400 774 2666 2529 2595 2707 3430 3572 3738 3795 
TSTINO§ 601226 6778 945* 1526 1658 1664 1666 1805* 1872* 1956* 20142 2077 21518 21958 


2259" 2311" 2359% 24600" 2452 2514* 2575 2695" 2760" 2866" 29728 3082" 3189¢ 
3223* 3277* 3345" 3405" 3469 3561" 3632* 37148 37798 


TST] 007356 1661 1678 1805# 
TST10 §=012160 2196 22598 
TST11 012422 2260 23114 
TS112 012650 2312 2359 
78713 396013022 2360 240084 
TST14 013260 2401 24528 
TS115 013530 2453 251484 
TST16 8=6014024 2515 2575 
TST17 = 014542 2576 26954 
TST2 007640 1806 18724 
1785720 §=©015050 2696 27604 
1$121 015516 2761 28664 
TS122 016164 2867 2972 
78123 016646 2973 30824 
1$124 017330 3083 3189" 
18125 017446 3190 32234 
18126 §=©.017640 3224 32778 
15127 =: 0200156 3278 33454 
1513 010204 1873 19564 
78130 §=©020436 3346 3405¢ 
1$131 021016 3406 3489" 
1$132 021356 3490 35614 
76133 = 0.21664 3562 30352m 
1$134 022256 36033 37144 
15135 022556 3715 3779" 3847 
18136 = eeeeee Y 3780 

1514 010472 1957 20144 
1515 011002 2015 20778 
1S16 011410 2078 215i 
1917 011622 2152 219584 
TTST 003174 11238 11248 11268 11278 11a Sy 


i 
———_— <4 


a Ff ] 
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TWOSYN= 000000 6154 

TKACT = 001000 7S3a 

THCSR =. 001412 845a 1502* 1530* 1533 1627* 1628 1629 1708* 1711* 1721* 17238 1728¢ 1737¢ 
1742" 1807* 1812* 1874* 1880" 1958+ 1963* 1969* 1975* 19&0* 2016" 2021" 2029¢ 
2058* 2043" 2079 2085" 2091" 2097 2102" 2116" 2123* 2128" 21538 2157 2163¢ 
2197* 2202" 2208 2226 2261" 2265 22/71 23138 23178 2323 2361* 2366" 2402¢ 
2408" 26546% 24618 26632 2491" 252228 2526* 2527 2530 2533 2553" 2590" 2592¢ 
2594e 2597 2697" 2703" 2705* 2713 2717 2722 2729 2733" 27708 2774% 28278 
2829" 2876 2880" 2933 2935" 2986" 2990* 30435* 3045" 3096" 3100* 3153¢ 3155e 
31948 3200* 3202* 3208+ 3226" 3232 3233" 3244 3245" 3284* 3286" 3348 3350¢ 
3358e 3368 3373 3376 3390" 3408+ $410* 3417" 3427 343) 3434 3492" 3498 
3502* 3512 3517 3520 3534 3537¢ 3545" 3564" 3570" 3596* 3602 3635* 3637« 
36448 3654 3659 3662 3696* 3717* 3719* 3726* 3735 3739 3742 3757« 3781¢ 
3792« 37948 3821* 

TXDBUF 001414 8464 1631* 1632* 1633 2460* 2464 2466 2469 2529 2532 2535" 2536 2538 
2595* 2601" 2603* 2702" 2707* 2720" 2777 2779 2790 2792 2803 2805 2818 
2820 2831 2833 2883 2885 2896 2898 2909 2911 2924 2926 2937 2939 
2993 2995 3006 3008 3019 3021 3034 3036 3047 3049 3103 3105 3116 
3118 3129 3131 3144 3146 3157 3159 3295 3297 3316 3318 3361 3363 
3372 3375 3378 3380 3382 3420 3422 3430* 3433s 34368 3440 3442 3450 
3452 3505 3507 3516* 7519* 3522 3524 3526 3539 3543 35720 3575 3577 
3586 3588 3603* 3605 3607 3647 3649 3658 3661* 3664* 36067 3669 3678 
3680 3728 3730 3738 3741* 37448 3746 3748 37918 3795* 3797« 3813« 3816¢ 

TXDLAT= 100000 7478 

TXDONE= 000200 755@ 8 §=3368 3427 3512 3534 3602 3654 

TXINTE= 000100 756@ §=©3202 3233 3537 3570 

TYPDAT 004602 1466 1484 14874 

TYPE = 104402 8134 963 1075 1093 1098 1122 1129 1141 1142 1144 1146 1148 1227 
1240 1259 1351 1388 1467 1468 1471 1472 1474 1476 1480 1485 1550 
1592 1652 1669 1670 1675 3835 3836 

TYPMSG 004502 1464 14674 

USER = 000000 7604 

WROCNT 004234 1359 1389* 13974 

WRKO.F 004570 1479 14824 

XBX 004374 1441 1443 14458 

xCSR 003130 1143 11654 . 

KERR 003152 1149 11744 

KHEAD 006014 1075 15664 

KPASS 003144 1147 11714 

KPOLY 014534 2582" 2656 2667 26764 3783+ 

XSTATQ 006042 1080 15664 

XTSTN 005000 1473 15248 

XVEC 003136 1145 11684 

$F = 000037 la 1806 18074 1873 1874#@ 1957 1958@ 2015 20168 2078 2079# 2152 21538 
2196 2197# 2260 22018 2312 23138 2360 23618 2401 24028 2453 24548 892515 
2516# 2576 2577# 2696 2697# 2761 27638 82867 28698 2973 2975@ 83083 3085e@ 
3190 3191" 3224 3225# 3278 3279" 3346 3347@ 3406 34078 3490 34918 3562 
35634 8 8§=—6.36 33 3634a 3715 3716# 3780 378i\8 

SENDAD 003104 641 961 1157@ 1492 

£N = 000035 la 1792 1799 1807# 1860 1866 18748 1945 1950 1958# 2002 2008 20168 
2065 2071 2079# 2140 2145 21538 82184 2189 21978 2248 2253 22618 2300 
2305 23134 2348 2353 23618 2387 2394 24028 2442 2446 24548 2502 2508 
25164 2°64 2569 2577# 2683 2689 2697# 2746 2754 27638 §=2852 2860 28698 
2958 2966 2975# 3068 3076 3085¢@ 3177 3183 319\@ 321) 3217 32258 §= 3263 
3271 3279@ = 8333 3339 33478 83393 3399 34078 347 348? 34918 3549 3555 
3563@ 3620 3626 36348 3703 3708 37168 3761 3773 378\8 38478 






SRAYO 


$1 


. ABS. 


" 


17777? 


000014 
024532 


002660 
004034 


003336 


024532 


ERRORS DETECTED: 


CZDPCD,(ZDPCD= set MAC,CZDPCD. 
RUN-TIME : 
RUN-TIME RATIO: 
CORE USED: 


DOCUMENT PAGES: 


12 171 
27K 





CZDPCC = MACYI1 wep bag? 


CZDPCD.P11 08-FEB-79 


000 


0 


SECON 


13: 


DS 


115/31=3.6 
(53 PAGES) 


88 


Pll 


1545@ 


1420 
946 
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17968 


1549 


3086 
38478 


kK 7 


18648 
2 


19498 


20024 

















SEQ 0088 


20078 
2 


